pdw2009的专栏

创建内存映像的程序--------------------------------------------------------------------------------------------unit Unit1;interfaceuses  Winapi.Windows, Winapi.Messages, System.SysUtils, Syste

动态创建tatabshell和表单例子

使用RzPageControl来实现多标签页使用菜单来打开标签页,通过标签页的caption来判断将标签页是否已经被打开过了.1.创建标签页,并判断是否是已经打开过的页面procedure TFmain.Page1Click(Sender: TObject);var newpage:TRzTabSheet; index:integer;begin newpage:=ni

delphi 标题栏相关操作

delphi 线程应用简单例子

Raize

Inno setup的状态页面和向导页面解释

delphi中EmbeddedWB网页html相互调用

Delphi TWebBrowser事件说明

delphi TWebBrowser 使用

Delphi : WebBrowser改造，对网页中Alter等对话框的改造方法

delphi中httpencode使用注意事项

delphi7 调rest接口的例子

delphi 防止程序重复执行

unit mousereplay;interfaceuses  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;

dll   代码--------------------------------------library keyHook;uses  System.SysUtils,  System.Classes,  Unit4 in 'Unit4.pas';{$R *.res}beginend.-------------

dll--------------------------------unit mouseHookdll;interfaceuses  Winapi.Windows, Winapi.Messages, System.SysUtils,System.SysConst,UnitHookConst;var  hmappingfile:THandle;

TDirectory.CreateDirectory();     {建立新目录}TDirectory.Exists();              {判断文件夹是否存在}TDirectory.IsEmpty();             {判断文件夹是否为空}TDirectory.Copy();                {复制文件夹}TDirectory.Move();  

//较常用的方法:TPath.GetTempPath;                   {获取临时文件夹路径}TPath.GetTempFileName;               {获取一个临时文件名}TPath.GetPathRoot();                 {提取盘符, 如: c:\}TPath.GetDirectoryName();          

和 TDirectory.GetFiles 用法一样, TDirectory.GetDirectories 是用来获取子目录的.另外还有 TDirectory.GetFileSystemEntries 可同时获取文件与子目录, 用法都一样.unit Unit1;interfaceuses  Windows, Messages, SysUtils,

uses IdHTTP;const Url = 'http://del.cnblogs.com';procedure TForm1.Button1Click(Sender: TObject);var  stream: TStringStream;  idHttpObj: TIdHTTP;begin  stream := TStringStream.Create('', TEnco

使用的是 Delphi 2010 下 IOUtils 单元的 TDirectory.Copy 函数:uses IOUtils;procedure TForm1.Button1Click(Sender: TObject);const  SourceDir = 'C:\Temp\Folder1'; { 源文件夹必须存在 }  DestDir = 'C:\Temp\Folder2'

外部声明     　　在Delphi中外部声明是访问外部例程最容易和最常用的方式，有两种声明方式：通过名字、通过索引号。举例如下：在MYDLL.DLL中有两个函数和一个过程，则其外部声明可以写成：         function   test1:integer;external   'mydll';     //直接通过名称调用test1（注意名称大小写敏感）。      

IOUtils 单元主要就是三个结构: TDirectory、TPath、TFile, 很有用; 下面是 TFile 的功能简介.TFile.Exists();//判断指定的文件是否存在TFile.Copy();//复制文件var  source,dest: string;begin  TFile.Copy(source, dest);

Delphi动态创建子窗口例子procedure TForm1.mlskntlbr2ItemDown(Sender: TObject; const ItemIndex: Integer);begin case ItemIndex of 0: ShowSubForm(Form2, TForm2); 1: ShowSubForm(Form3, TForm3...