Delphi
文章平均质量分 68
liuronghua
这个作者很懒,什么都没留下…
展开
-
得到Window快捷方式的具体路径
Uses ActiveX, ShlObj;function GetLinkFile(const LnkFileName: String; var FileName: String): Boolean;var hr: HRESULT; psl: IShelllink; wfd: WIN32_FIND_DATA; ppf: IPersistFile; lpw: pWi转载 2007-03-14 09:06:00 · 908 阅读 · 0 评论 -
得到文件创建时间和修改时间的最大者
在部分Win2k系统中,AutoCAD修改Dwg文件只修改了创建时间,修改时间不变,不知为何。 所以用下面的函数来得到文件时间。Uses SysUtils;function GetFileMaxTime(sFileName: String): String;var Tp: TSearchRec; Tct: _SystemTime; Temp, Fd: _F转载 2007-03-14 08:55:00 · 1048 阅读 · 0 评论