2004 年 4月 2 日随笔档案 - cjsh

2004年4月2日

摘要： http://www.devexpress.com/?section=/bestpractices/SAP-VCL 阅读全文

posted @ 2004-04-02 21:03 cjsh 阅读(817) 评论(0) 推荐(0) 编辑

摘要： //检查字符串中是否包含英文function CheckEn(AEn: String): Boolean;var ans : AnsiString; wis : WideString; i, anslng, wislng: integer;begin Result := False; ans := AnsiString(AEn); wis := WideString(AEn); for i... 阅读全文

posted @ 2004-04-02 18:53 cjsh 阅读(883) 评论(0) 推荐(0) 编辑

如何提高两个String相加的速度

摘要： StringA := '';LenA := 0;MemLen := 10*1024;Setlength(StringA, MemoLen);While not Query1.Eof dobegin StringB := Query1.Fieldbyname('AField').AsStrimg; LenB := Length(StringB); if (LenA+LenB)>MemLen ... 阅读全文

posted @ 2004-04-02 13:42 cjsh 阅读(1078) 评论(0) 推荐(0) 编辑