随笔分类 - D 总结或误解澄清
或无痛痒误解
摘要:http://www.cnblogs.com/del/archive/2008/01/14/1037556.html unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Contro
阅读全文
posted @ 2016-06-06 12:30
海蓝7
摘要:【仙人】[上海]心跳(815936792) 2015-08-18 10:27:59 我这个控件中间是杠 ,可以查出数据来,放到别人的机器上就是斜杠/数据查不出来,该怎么弄 【大师】深圳-FlyDream(1715666978) 2015-08-18 10:30:26日期的设置格式 【仙人】[宝安]将
阅读全文
摘要:2、delphi 包含3种文件,工程文件(.dpr),单元文件(.pas),窗体文件(.dfm)工程文件包含了应用程序的入口;单元文件是你要写代码的地方,比如unit部分是指明了文件的名字,uses子句指示编译器添加在列出的个单元中找到的代码等等,窗体文件是指脚本化的文本文件,其中定义了一些资源,使
阅读全文
摘要:FormatDateTime('yyyy-mm-dd hh:nn:ss',Now) FormatDateTime('hh:mm:ss:zz',Now) if (TimeOf(now) < pub_StartWorkTime) or (TimeOf(now) > pub_EndWorkTime) th
阅读全文
摘要://用互斥CreateMutex来运行唯一实例 {$R *.res} var mutex:HWND; exitHWND:HWND; begin if(ParamCount<5) then begin ShowMessage('参数不正确'); Exit; end; RootGroupID:=StrT
阅读全文
摘要://1、打开目录和打开txt文件 procedure TMainForm.bbtnOpenLoClick(Sender: TObject); var sLogName: string; begin sLogName := Pub_EXEPath + '\日志\' + FormatDateTime('yyyy-mm-dd',date())+'.txt'; if not FileExis...
阅读全文
摘要://2.2 代码块--写日志 //调用例句如:LogMsg('FTP上传线程终止',False,true); procedure LogMsg(AMsg: string; const blnIsErrorMsg: boolean = False; const BoolSaveToFile: Boolean = True); var strMsg: string; begin try ...
阅读全文
摘要://Json 格式如下
阅读全文

浙公网安备 33010602011771号