随笔分类 -  Delphi

摘要：//TStringList 常用方法与属性:var List: TStringList; i: Integer;begin List := TStringList.Create; List.Add('Strings1'); {添加} List.Add('Strings2'); List.Exchange(0,1); {置换} List.Insert(0,'Strings3'); {插入} i := List.IndexOf('Strings1'); {第一次出现的位置} List.Sort; {排序} List.Sorted := 阅读全文

摘要：格林治时间，也就是返回从 UTC 1970 年 1 月 1 日午夜开始经过的毫秒数。(*Delphi获取13位格林治时间实现方法，与java中的java.lang.System.currentTimeMillis()效果相同*)varSysTime: TSystemTime;begin GetSystemTime(SysTime);// 方法1Memo1.Lines.Add(FormatFloat('#', CompToDouble(TimeStampToMSecs(DateTimeToTimeStamp(SystemTimeToDateTime(SysTime)))) - T 阅读全文

摘要：win7后，多了UAC这个蛋疼的东西，XE2中加入方法及说明如下：标准格式：<?xml version="1.0" encoding="UTF-8" standalone="yes"?><assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0"> <trustInfo xmlns="urn:schemas-microsoft-com:asm.v3"> &l 阅读全文

摘要：方法1：[代码]方法2：[代码]一般情况下，采用方法2来操作。压缩效果，可去华军软件园或天空下载站下载“图片伴侣”来体验下。 阅读全文

摘要：很多资料只提到升迁到xe，而我们调用底版本c++开发的程序，是只能按Ansi操作的，所以需要反向转换。var s:PansiChar;s:=PansiChar(AnsiString('我我我我我'));//这样就能转换过来了，如果没有AnsiString转换一下，那就只能取到第一个字符 阅读全文

摘要：写注册表中REG_MULTI_SZ的代码，支持d2010，EM论坛里找的。[代码] 阅读全文

摘要：Delphi键盘按键伪码键 盘 按 键 伪 码常数名称 十六进制值 十进制值 对应按键VK_LBUTTON 01 1 鼠标的左键VK_RBUTTON 02 2 鼠标的右键VK-CANCEL 03 3 Contol-break 执行VK_MBUTTON 04 4 鼠标的中键（三按键鼠标)VK_BACK 08 8 Backspace键VK_TAB 09 9 Tab键VK_CLEAR 0C 12 Cle... 阅读全文

摘要：二进制转换[代码]16进制转字符[代码]16进制转十进制[代码]数据转换成二进制[代码]非原创，收藏供查询。 阅读全文

摘要：Delphi7 Lite Edition 7.3.4.0 [2010-11-20]序【Borland是一家令人景仰的公司,當值Borland已成往事之際,謹以此產品獻給曾經的Borland,紀念已經仙逝的Borland,藉以緬懷Borland傳奇中的經(精)典Delphi7.本產品僅供學習交流之用,未與任何盈利為目的,請勿用於任何非法的商業用途,否則後果自負.】 Delphi7 Lite,簡約而不... 阅读全文

摘要：很多朋友开发好程序，又需要时间去开发升级模块，比较麻烦，我在这里给出一个通用升级工具的解决方法。首先，我们考虑下对这个升级程序或模块的要求，主要是通用性和便捷性这两点；在这里，我忽然想到了网络游戏的更新程序，发现它非常不错，我们可以像它一样，由主程序调用独立的LiveUpdate程序，对自己进行升级，这样就解决了通用性的问题，具体如何做呢？我们可以利用EXE文件参数的方法来实现，也就是给程序添加运... 阅读全文

摘要：假设您要将模式窗口为主的桌面程序改成融合窗口，原子窗口为TForm类型窗口。用到的组件：Raize 5.x (不要问我为什么不用TFrame)目前流行用Raize的RzPageControl来做融合窗口，因为它自带TabSheet的关闭按钮和事件，所以大家都用这个了。我的实现方法是放一个RzTabSheet当首页，上面显示一些通知通告、待办事项提醒的项目，然后所有子模块的窗口直接动态创建到RzPa... 阅读全文