Delphi编写的日志文件记录组件源程序

Delphi编写的日志记录组件源代码，从中可以学习自定义组件的一些技巧，如注册到组件面板、添加自定义图标等。 日志组件具有以下属性及方法： public { Public declarations } procedure AddLog(p_Info: string); //添加一条日志信息 procedure FlushLogFile; //日志内容立即写入文件 published { Published declarations } property LogFilePath: string; //日志文件保存的路径 property LogFileNamePrefix: string ; //日志文件名前缀 property LogFileNameSuffix: string; //日志文件名后缀 property MaxCountPreFile: integer; //每个文件最大记录数 property Reserved: integer; //保留前多少个日志文件 property SingleLine: boolean; //每行一条记录 property RecordTime: Boolean; //自动添加时间 property Display: TStrings read ; //显示日志内容的Memo或Listbox的Items property AddBlankLine: Boolean; //在日志信息后添加空白行 property FlushImmediately: Boolean ; //立即将文件缓存写入磁盘 end; ------------------------------------ 文件列表: LogWriter.pas//源代码 LogWriter.dcr//组件图标文件 为自己的组件添加图标的方法.doc //