最近电脑开机后发现桌面软件图片没有了，恶心的一笔，强迫症啊，实在不习惯。 找来找去问题出在图标缓存上。 解决方案如下： 新建bat文件，代码如下。 rem 关闭Windows外壳程序explorer taskkill /f /im explorer.exe rem 清理系统图
年度归档： 2015 年
Firemonkey获取当前文件所在路径的方法
在之前，我们知道有三种方法： ExtractFilePath(ParamStr(0)) ExtractFilePath(Application.ExeName) GetCurrentDir + '\' 在Firemonkey中，Windows模式下第一种、第三种还有效： ExtractFilePath(ParamStr(0)) GetCurrentDir + 
关于FastReport运行时报错“Class TfrxRichView not found”的问题
解决的办法是将FastReport控件面板中的TfrxRichObject控件拖放到窗体中即可，对于其它类似的报不到类的错误也可这样处理。 还有一个办法就是直接在Interface中uses对应的单元，TfrxRichObject对应的单元是frxRich。
Delphi CDS 加载类型库/DLL时出错的解决方法
把原来的三层架构的程序搬家到服务器上（win2008系统），在服务器上运行服务端程序均正常， 但是运行客户端远程连接时出现“加载类型库/DLL时出错”提示。 看客户端程序运行的过程应该是已经连接到远程服务器，应该是系统调用某个默认的系统文件时出现版本不同造成的， 会不会跟三层连接的Midas.dll有关呢，试试吧！ 拷贝本地的Midas.dll到服务器的C:\w
关于StringGrid类型的居中实现
在开发中有些地方采用StringGrid实现数据的操作，但是默认的是采用左对齐，无法设置居中。 实现方案只能采用自绘方案了。 在StringGrid的OnDrawCell事件中 var CellString:string; begin &nbs
定期删除程序运行日志文件
程序下生成的日志文件，随着程序的使用慢慢的变多，出于对软件的维护，我们要定期删除过早的日志文件。 索性就整个代码吧。 function DelAppLog():boolean;//是否删除程序运行日志文件 var t:tdatetime;//用来临时存放日志文件的创建时间 begin try if fileexists(logfile) then
Delphi DateUtils-Function详解
IncYear、IncMonth、IncWeek、IncDay、IncHour、IncMinute、IncSecond、IncMilliSecond DateUtils.IncYear(); DateUtils.IncMonth(); DateUtils.IncWeek(); DateUtils.IncDay(); DateUtils.IncHour(); DateUtils.IncMinute(); DateUtils.IncSecond(); DateUtils.IncMilliSecond