sg24K的博客

delphi 获取文件的相关时间（最新更新时间，创建事件等，可以用于开发监控文件变更的功能）function CovFileDate(Fd :_FileTime): TDateTime;{转换文件的时间格式}var Tct:_SystemTime; Temp:_FileTime;begin FileTimeToLocalFileTime(Fd, Temp); FileTim...

delphi 获取MAC地址function GetMacAddress(const AServerName : string='') : string;type TNetTransportEnum = function(pszServer : PWideChar; Level : DWORD; ...

初始化Tcombobox //初始化cbbbusinesstype with TADOQuery.Create(nil) do begin try connection := TADOConnection(GDBConnection); SQL.Text := 'SELECT distinct tb.c_businname FROM vaml_requ...

今天有个客户要求连接https去获取数据，而我的系统是delphi6开发的，选择空间tidhttp进行了一波尝试，发现delphi6的tidhttp控件只支持http而不支持https，几经探索才成功完成任务，记录如下：选择secureblackbox控件，控件在我的其他博客可以免费下载，待会儿上传，下载后请把pakages里面所有delphi6对应的控件全部安装（打开的delphi6，打开ob...

Delphi Tmessage标准消息详解最近编程遇到很多与窗体以外的事件交互的功能，需要用到窗体以外的鼠标事件，包括窗体以外左键单击双击，窗体以外右键单击双击，这就需要用到windows系统的标准消息。

一般分隔符以不太常见的字符组合为佳，如 ^^|， ~|~之类的比较常见，但毕竟这些字符都是可以通过键盘敲入的，这就导致在极罕见的情况下，依然会有客户键盘敲入这些字符导致数据解析错误。怎么解决这种情况呢？