李敖有首诗叫《只爱一点点》 : 不爱那么多, 只爱一点点; 别人的爱情像海深, 我的爱情浅。 不爱那么多, 只爱一点点; 别人的爱情像天长, 我的爱情短。 不爱那么多, 只爱一点点; 别人眉来又眼去, 我只偷看你一眼。 一点足够。在黄易的大唐双龙传中有个说法叫《遁去的一》,也就是说任何事情在纷杂万象 Read More
posted @ 2016-03-04 06:00 findumars Views(1084) Comments(0) Diggs(0)
现在,DATASNAP倾向于使用JSON作为统一的数据序列格式,以期达到跨平台的效果。于是使用JSON便成为热点。unit uJSONDB; interface uses SysUtils, Classes, Variants, DB, DBClient, SuperObject, Dialogs; Read More
posted @ 2016-03-02 23:45 findumars Views(717) Comments(0) Diggs(0)
完全自定义窗体风格的实现 最小化到任务栏postmessage(Self.Handle,WM_SYSCOMMAND,SC_MINIMIZE,0); 最大化或还原procedure Tf_MainForm.RzToolButton1Click(Sender: TObject);var abd: TAp Read More
posted @ 2016-03-02 23:43 findumars Views(900) Comments(0) Diggs(0)
program Monitor; // {$APPTYPE CONSOLE} uses Winapi.Windows, System.SysUtils, ProcLib in 'ProcLib.pas'; var Mutex: HWND; const c_AppName = 'server.exe' Read More
posted @ 2016-03-02 23:41 findumars Views(399) Comments(0) Diggs(0)
对于一些小文件,用普通的文件流就可以很好的解决,可是对于超大文件,比如2G或者更多,文件流就不行了,所以要使用API的内存映射的相关方法,即使是内存映射,也不能一次映射全部文件的大小,所以必须采取分块映射,每次处理一小部分。 先来看几个函数 CreateFile :打开文件 GetFileSize Read More
posted @ 2016-03-02 23:39 findumars Views(2012) Comments(1) Diggs(0)