随笔分类 -  Delphi

摘要：转自：http://home.51.com/qq105533846/diary/item/10052777.html unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Contro 阅读全文

摘要：unit Unit1; interface uses Classes, Controls, Forms, Dialogs, StdCtrls, IdMessage, IdSMTP, IdAttachmentFile, IdBaseComponent, IdComponent, IdTCPConnec 阅读全文

摘要：unit untCRCMD5; interface { 获取文件CRC校验码 } function GetFileCRC(const iFileName: string): String; { 获取字符串CRC校验码 } function GetStringCRC(const Str: string 阅读全文

摘要：如果数据库所在的路径是中文路径的话，根本运行不起来，会报错，因为sqlite用的是utf8编码。 解决办法：AnsiToUtf8() 例如： DBPath := ExtractFilepath(application.exename)+ 'MyInfo.db'; gdb := TSQLiteData 阅读全文