摘要：
//新的DATASNAP已经支持TPARAMS作为远程方法里面的参数，会自动序列TPARAMS，无需手动序列它。 //在此只是记录一些JSON序列的用法，无实际意义 unit uSerialize; interface uses System.SysUtils, Data.Win.ADODB, Data.DBXJSON, Data.DBXJSONReflect, ... 阅读全文
摘要：
DELPHI IDE中部分操作快捷方式 1 代码模板：CTRL+J 2 代码整块移动（先选中代码块）：CTRL+SHIFT+I（右移） CTRL+SHIFT+U（左移） 3 选中窗体 ： 先选中任一控件，SHIFT+鼠标左键 4 将鼠标指向变量名、单元名、类名，再用 CTRL+鼠标左键 可找到相应的说明 5 在过程、函数、事件内部， SHIFT+CTRL+向上的方向键 可跳跃到相应的过程、函数、事... 阅读全文
摘要：
1． 警告信息框 MessageBox(Handle,'警告信息框','警告信息框',MB_ICONWARNING); 2．疑问信息框 MessageBox(Handle,'疑问信息框','疑问信息框',MB_ICONQUESTION); 3．错误提示框 MessageBox(Handle,'错误信息框','错误信息框',MB_ICONERROR); 4．提示信息框 MessageBox(Hand... 阅读全文
摘要：
private procedure FormMove(var Msg: TWMMove); message WM_MOVE; procedure TForm1.FormMove(var Msg: TWMMove);var WorkArea: TRect;begin inherited; if SystemParametersInfo(SPI_GETWORKAREA, 0, @WorkArea, 0... 阅读全文
摘要：
uses Registry; Registry为我们提供了操作注册表的方法,这里我们用TRegIniFile提供的方法,TRegIniFile继承自TRegistry,TRegIniFile提供的方法类似于前面讲到的操作Ini文件的方法,这样就大大简化了我们操作"神秘"注册表的方法,下面是常用的方法: function CreateKey(const Key: String): Boolean; ... 阅读全文
摘要：
----在一个应用程序内部菜单、部件都可以设置敏感键。如在菜单中一般用Alt+F进 入“文件”之类的子菜单。另外我们在桌面上设置的快捷方式里的快捷键，无论你任何 时候按下你所设置的快捷键就会启动相应的应用程序。在多个正在运行的应用程序中如 何利用一个按键动作迅速地回到你所需要的应用程序呢？这就需要利用敏感键 （HOTKEY）的技术来实现。本文利用Delphi3.0开发工具来阐述该技术在应用程序的实... 阅读全文
摘要：
---- 在网络管理中，有时需要通过监视远程计算机屏幕来了解网上微机的使用情况。虽然，市面上有很多软件可以实现该功能，有些甚至可以进行远程控制，但在使用上缺乏灵活性，如无法指定远程计算机屏幕区域的大小和位置，进而无法在一屏上同时监视多个屏幕。其实，可以用Delphi自行编制一个灵活的远程屏幕抓取工具，简述如下。 ---- 一、软硬件要求。 ---- Windows95/98对等网，用来监视的计算机... 阅读全文
摘要：
定义 1、在Interface的Uses节增加IniFiles； 2、在Var变量定义部分增加一行： MyIniFile:Tinifile; 打开INI文件 MyIniFile:=Tinifile.create('program.ini'); 当地： Filename := ExtractFilePath(Paramstr(0)) + 'data.ini'; sysini := Tinifile... 阅读全文
摘要：
uses StrUtils; 【字符串函数大全】 首部 function AnsiResemblesText(const AText, AOther: string): Boolean; $[StrUtils.pas 功能 返回两个字符串是否相似 说明 ANSI(American National Standards Institute)美国国家标准协会;不区分大小写 参考 function St... 阅读全文
摘要：
两种方面都是运行在project/view source里编辑。一个是利用Windows系统的全局原子，另一个是利用API函数比较同类同名窗体。 1.全局原子 利用向系统添加全局原子的方法，全局原子由Windows 系统负责维持，它能保证其中的每个原子都是唯一的，管理其引用计数，并且当该全局原子的引用计数为0时，从内存中清除。我们用GlobalAddAtom 函数向全局原子添加一个255... 阅读全文