unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Memo1: TMemo; procedure Button1Click(Sender: TObject); procedure FormCreat...
應要求在程式執行時還要可以拉拖、改變元件大家～ 分享一個不錯的函數 procedureDragResizeControl(WinControl:TControl;Shift:TShiftState;X,Y,Precision:integer); var SC_MANIPULATE:Word; begin if(X=Precision)and(YPre...
XE6的Switch元件增加了多國語系的功能，不過很遺憾的是它在中文的部份只認得zh，不會分辨zh_CN、zh_TW、zh_SG跟zh_HK。但是幸好Delphi是可以自己修正原始碼的:) 將ProgramFilesEmbarcaderoStudio14....
由程序发出来的包是这样的 GET/s?lm=0si=rn=10ie=gb2312ct=0wd=qwqwpn=00ver=0cl=3HTTP/1.1 Content-Type:text/html Host:www.baidu.com Accept:text/html,*/* User-Agent:Mozilla/3.0(compatible;IndyLibrary) User-Agent:Mozilla/3.0(compatibl...
皮肤这东西很多人褒贬不一，有人认为程序做的好就行了，界面还是保持原生态来的稳定。的确，稳定是程序至关重要的一点，离开这点其他任何都无从谈起，但不可否认，无论是微软...
前面从网络中收藏加转贴了一部分关于变长参数函数的笔记。反正休闲没事，于是就专门的研究研究了如何用Delphi来实现类似于C语言中Printf这种可以传递任意多个参数的函数。这个实际...
根据〖中华人民共和国国家标准 GB 11643-1999〗中有关公民身份号码的规定， 公民身份号码是特征组合码18位：由十七位数字本体码和一位数字校验码组成。排列顺序从左至右依次为：六...
声明： procedure DecodeDate ( const SourceDate : TDateTime; out Year, Month, Day : Word ) ; 描述：DecodeDate过程从一个给定的TDateTime类型SourceDate参数中提取相应的年、月、日的值。 它将数值保存在输出型...
一、概述 锁是操作系统为实现数据共享而提供的一种安全机制，它使得不同的应用程序，不同的计算机之间可以安全有效地共享和交换数据。要保证安全有效地操作共享数据，必须在相...
你是否想为你的Windows加上一双眼睛，察看使用者在机器上所做的各种操作（例如建立、删除文件；改变文件或目录名字）呢？ 这里介绍一种利用Windows未公开函数实现这个功能的方法。...