以后路径相关的处理, 用 IOUtils.TPath 就很方便了. //较常用的方法: TPath.GetTempPath; {获取临时文件夹路径} TPath.GetTempFileName; {获取一个临时文件名} TPath.GetPathRoot(); {提取盘符, 如: c:\} TP

Delphi 数据类型 C/C++ ShorInt 8位有符号整数 char Byte 8位无符号整数 BYTE,unsigned short SmallInt 16位有符号整数 short Word 16位无符号整数 unsigned short Integer,LongInt 32位有符号整数 int,long Cardinal,LongWord/DWORD 32位无符号整数 unsigned

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Button

TDictionary 类似哈希表. 本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm)

分类 范围 字节 备注 简单类型 序数 整数 Integer -2147483648 .. 2147483647 4 有符号32位 Cardinal 0 .. 4294967295 4 无符号32位 Shortint -128 .. 127 1 有符号8位 Smallint -32768 .. 32767 2 有符号16位 Longint -2147483648 .. 2147483647 4 有

分类 运算符 操作 操作数 结果类型 范例 算术运算符 + 加 整数，实数 整数，实数 X + Y - 减 整数，实数 整数，实数 Result - 1 * 乘 整数，实数 整数，实数 P * InterestRate / 实数除 整数，实数 实数 X / 2 div 整数除 整数 整数 Total div UnitSize mod 取模 整数 整数 Y mod 6 +(一元) 符号等同 整数，实

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Button

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Button

首先声明，本帖更新时间不固定。另外，只愿意使用d7者勿入。 为了节省篇幅，d7之前的就不提了。d7之后，对升级影响比较大的版本有这些：delphi2009，xe2以及xe5。2009开始string默认为unicode，xe2引入firemonkey，xe5支持手机开发。 高版本的其它一些新特性，比如泛型，闭包，增强的rtti，dbexpress，helper等等，虽然也很强大，不过不影响程序的迁

今天写delphi xe7下的一个多平台的安卓程序,本来好好的程序,突然有如下提示: ClientModuleUnit2.pas(8): F1026 File not found: 'F:\2.work\9031.DataSnapDemo\clientMuti\Data.DBXMSSQL.dcu' (unit scope "Data" indicates Android, iOSDevice, W

概述：    ^: 指针    @: 取址    #: 十进制符    $: 十六进制符 @:取址运算符; var    int:integer;    p:^integer; begin    new(P);    int:=24;    p:=@int;    dispose(P); end; ^:指针的引用解析操作符; var    pint:^integer; begin    new(p

//TStringList 常用方法与属性: var List: TStringList; i: Integer; begin List := TStringList.Create; List.Add('Strings1'); {添加} List.Add('Strings2'); List.Exchange(0,1); {置换}

Flags: checkablealone checkablealone  搜索"选中"意思 unchecked       "非选中"意思

1、与运算等位操作，代码如下： procedure TForm1.Button1Click(Sender: TObject); Var x,y,z:Byte; begin x:=10;//二进制:1010 y:=12;//二进制:1100 ShowMessage(InttoStr(x and y));//显示与运算结果 ,结果为:1000 ShowMessage(In

TBookMark: GetBookMark,GotoBookMark,FreeBookMark的参数，不同的数据集实现BOOKMarKs的方式不一样。所有不要再不同的数据集上使用同一个BOOKMark，如Client DataSet 和 interDataset; ExpressMemData是一个超快的内存数据集后代。可以从多个数据源中获取数据。如文本，2进制，ini文件，跟其他数据类型。可以

//from http://kingron.myetang.com/zsfunc0d.htm (*// 标题:充分利用pascal字符串类型 说明:和PChar不同,string可以保存#0字符在其中;示例文件、内存流字符串之间转换 设计:Zswang 日期:2002-01-25 支持:wjhu111@21cn.com //*) /////

var   WordApp,WordDoc: Variant;   doc: TWordDocument;   DocInx,oFileName,CfCversions,oReadOnly,AddToRctFiles,PswDocument,   PswTemplate,oRevert,WPswDocument,WPswTemplate,oFormat,oFileDoc: OleVariant;

Delphi XE7已经内建了蓝牙功能，提供了System.Bluetooth.pas单元 顾名思义，System表示XE7的蓝牙功能可以在Windows，Android，IOS系统内使用 System.Bluetooth单元中主要包含一下几个类 TBluetoothManager TBluetoothDeviceList TBluetoothAdapter TBluetoothDevice TB

原始代码转自：http://www.voidcn.com/article/p-aabzkllf-pv.html 修改后源码pas文件下载：http://www.colafile.com/file/2588729   {***************************************************************************} {

前段时间关注了VC6.0自带的Installshield打包的使用方法，感觉繁琐，现在找到一个比较简单实用的打包小工具Inno setup,使用方法如下。 （1）将编写好的程序生成Release版本，打开Inno setup 5小软件，弹出如下界面： 点击菜单栏“文件”——“新建”，出现如下界面 点击下一步，出现如下界面 这里要填写程序的名字，如“My App”，用用版本“1.00”，应用程序的发

idhttp中对于get方法的定义： [delphi]  view plain copy print ? procedure Get(AURL: string; AResponseContent: TStream); overload;   procedure Get(AURL: string; AResponseContent: TStream; AIgnoreReplies: array of

图片的格式很多，一个图片文件的后缀名并不能说明这个图片的真正格式什么，那么如何获取图片的格式呢？我想到了几个简单但有效的方法，那就是读取图片文件的文件头标识。我们知道各种格式的图片的文件头标识识不同的，因此我们可以通过判断文件头的标识来识别图片格式。      我对各种格式的图片文件头标识进行了分析，不仅查找资料，也用十六进制编辑器察看过图片的文件头，以下是我收集、分析的结果，供大家参考。 1.J

var   s: string;   p: pchar;   a: array[1..20] of char; 1、字符串 ---> PChar   p := PChar(s); 2、PChar ---> 字符串   s := p; 3、PChar ---> 字符数组   StrCopy(@a , p); 4、字符数组 ---> PChar   PChar(@a); 5、字符串 ---> 字符数组

所有的原生字符串类型String转PAnsiChar都需要经过AnsiString过渡 strAnsi:= PAnsiChar(AnsiString(str));

        在Delphi或者其它程序中我们经常需要调用别人写好的DLL类库,下面直接上示例代码演示如何进行动态和静态的调用方法: { **********************************************************} { } {

Delphi中TStringList类常用属性方法详解 //TStringList 常用方法与属性: var    List: TStringList;    i: Integer ; begin    List := TStringList . Create;    List . Add( 'Strings1' );           {添加}    List . Add( 'Strings2

 原文地址：http://www.cnblogs.com/del/archive/2007/12/03/981563.html Delphi 数据类型 C/C++ ShorInt 8位有符号整数 char Byte 8位无符号整数 BYTE,unsigned short SmallInt 16位有符号整数 short Word 16位无符号整数 unsigned short Integer,L

分类 快捷键 解释 备注 组 件 设 计 类 Escape 选择当前组件容器   Shift + Click 选择多个组件；选择窗体   Tab 选择下一个组件   Shift + Tab 选择上一个组件   方向键 选择此方向的下一个组件   Ctrl + 方向键 将所选组件的位置移动 1 个像素   Shift + 方向键 将所选组件的大小改变 1 个像素   Ctrl + Shift + 方

delphi中指针的用法   (2009-02-15 14:42:19) 转载▼ 标签：  杂谈 分类： Delphi delphi中指针的用法 [Delphi学习]浅谈Object Pascal的指针           → Kendy 发表于 2005-2-19 14:14:00 来源：HackDIY's Blog          大家都认为，C语言之所以强大，以及其自由性，很大部分体现在其

在更新程式時，需要知道目前下載到多少百分比及大小怎麼做？ 在Delphi使用idhttp及IdAntiFreeze（防止程式看起來當掉）二個元件就可以做得到。順便列下關鍵程式碼 procedure TForm1 . BtnDownloadClick(Sender: TObject); var    tStream: TMemoryStream; begin    tStream := TMemor