function UncrypStr(const __src, __key: string): string;var nKeyLen, nKeyPos, nOffSet, nSrcPos, nSrcAsc, nTmpSrcAsc: Integer; sDest, sSrc, sKey: AnsiString;begin sSrc := AnsiString(__src); sKey := AnsiString(__key); nKeyLen := Length(sKey); if nKeyLen = 0 then sKey := 'tigercat'; nKeyPos := 0; nOffSet := S
删除 C:Users用户名AppDataRoamingModelMakerToolsSharedTemplates_Index.dat
Project > Options > Delphi Compiler> Compiling > Other Options .Add -LUDesignIDE to the Additional Options field.在属性配置里填写 -LUDesignIDE 就好了
发布时间:
2014-10-05 |
类别:
编程相关 | 阅读:1990 | 评论:0 |
标签:
delphi