日志的输出有助于程序的调试和问题的查找。在Java里面有log4J, 虽然Delphi里面有也有log4D,和showMessage,始终觉得不是蛮方便。
这几天在写socket程序,顺手就写了一个日志记录和查看的工具
Form1为测试程序,
日志显示器为查看程序
Form1为测试程序,
日志显示器为查看程序
分成两部分
1,日志查看(logViewer.exe),是一个socket的服务,用来接收日志,和显示日志。
2,日志记录(logClient.dll),提供日志记录功能,负责发送日志信息。
pas文件说明
logClientWrapper.pas包装了logClient.dll的功能。
uILogService.pas, 提供了logClient.dll输出的接口申明。
如何使用,
1.将logClient.dll放到程序的libs\目录下(原则来说是通用的,D7-DXE),在Delphi2007下测试
2.配置config\log.config(JSon格式配置)
{
enable:true, //打开日志记录(正式发布时可以关闭,这样不占用任何socket
server: //日志服务器
{
host:"127.0.0.1",
port:8090,
},
filter: //过滤发送
{
"level":"", //"warning,error,debug,info", //不配置或者为空,则记录所有日志
},
}
3.引用logClientWrapper.pas进行日志记录
TlogClientWrapper.logINfo(\'测试普通类型的日志\' + CreateClassID);
//查看器中有sql语法的显示
TlogClientWrapper.logINfo(\'--这是一个SQL类型的日志\' + sLineBreak + \'SELECT * FROM sys_Tables\',\'debug\', \'sql\');
--下载地址
演示文件