DIOCP组件(Delphi IOCP)代码阅读之ADO内存表 代码中有 class procedure TADOTools.loadFromStream(pvDataSet: TCustomADODataSet; pvStream: TStream); var AR:_Recordset; begin AR:=_Recordset(CoRecordset.Create); pvStream.Position:=0; AR.Open(TStreamAdapter.Create(pvStream)
由于昨天要写的文章没有写完,于是今天早上我四点半就"自然醒"了,心里面有事,睡觉也不安稳.洗漱完毕后,我打开电脑,正襟危坐,摆出一副要干架的态势,不能再拖了. 要写的文章中涉及到一串代码,关于 Undertow 的一个入门示例,贴出来大家看一下. public class UndertowTest { public static void main(final String[] args) { Undertow server = Undertow.builder()
1.取得可文件路径 Path := ExtractFilePath(Application.ExeName); //取得可执行文件路径 TXMLDocument.Create(ExtractFilePath(Application.ExeName)+ '001.xml') 2.DisableControls EnableControls ClientDataSet.DisableControls; ... for I := 0 to 10000 do begin ClientDataSet.Ap
delphi 的IDE快捷键与输入法切换键中突,以往的解决方法是下载一个ImeTool修改 windows 系统的快捷键 在 xp win7 都好使,但在win 10经常是修改完后,重启又失效了. 本方法采用 Open Tools API 编写是一个组件.安装方法: 菜单-->Component -->install Component 然后选择此本单元,然后就瞎折腾吧.就好了. 源码下载 unit EagleBufferList; interface procedure Register;
delphi 的IDE快捷键与输入法切换键中突,以往的解决方法是下载一个ImeTool修改 windows 系统的快捷键 在 xp win7 都好使,但在win 10经常是修改完后,重启又失效了. 本方法采用 Open Tools API 编写是一个组件.安装方法: 菜单-->Component -->install Component 然后选择此本单元,然后就瞎折腾吧.就好了. 源码下载 unit EagleBufferList; interface procedure Register;