声明: procedure DecodeDate ( const SourceDate : TDateTime; out Year, Month, Day : Word ) ; 描述:DecodeDate过程从一个给定的TDateTime类型SourceDate参数中提取相应的年、月、日的值。 它将数值保存在输出型...
一、概述 锁是操作系统为实现数据共享而提供的一种安全机制,它使得不同的应用程序,不同的计算机之间可以安全有效地共享和交换数据。要保证安全有效地操作共享数据,必须在相...
你是否想为你的Windows加上一双眼睛,察看使用者在机器上所做的各种操作(例如建立、删除文件;改变文件或目录名字)呢? 这里介绍一种利用Windows未公开函数实现这个功能的方法。...
function TfrmLabelPages.PwdImg(img: Timage): string; var I,j,k: Integer; vPoint: TPoint; vLeft: Integer; arrStr:array [1..36]of string ; strResult: string; begin strResult := ''; arrStr[1] := '0'; arrStr[2]:='1'; arrStr[3]:='2'; arrStr[4]:=...
(一)使用动态创建的方法 首先创建Excel对象,使用ComObj: varExcelApp:Variant; ExcelApp:=CreateOleObject('Excel.Application'); 1)显示当前窗口: ExcelApp.Visible:=True; 2)更改Excel标题栏: ExcelApp.Caption:='应用程...
问题: procedureInitRichEditURLDetection(RE:TRichEdit); var mask:Word; begin mask:=SendMessage(RE.Handle,EM_GETEVENTMASK,0,0); SendMessage(RE.Handle,EM_SETEVENTMASK,0,maskorENM_LINK); end; //接收消息 procedurereceive(varMsg:TMessage)...
代码思路原作者,不详.......................膜拜第一位作者的开创思维 本人只是稍作修改和写入一些原作者没有告诉的东西 首先输入法必备的19个接口自己不要删除,不然输入法编译出来安...
作者:不详 不知不觉做软件已经做了十年,有成功的喜悦,也有失败的痛苦,但总不敢称自己是高手,因为和我心目中真正的高手们比起来,还差的太远。世界上并没有成为高手的捷径...
程序人生 : 30岁,我的程序员梦想 作 者: redbridge (雪燃) 30岁,开始实现我的程序员梦,从一个编程爱好者,从一个业余的程序员,一个水平不高的程序员,一个半道出家的程序员.......
根据〖中华人民共和国国家标准 GB 11643-1999〗中有关公民身份号码的规定, 公民身份号码是特征组合码18位:由十七位数字本体码和一位数字校验码组成。排列顺序从左至右依次为:六...