kimifdw的专栏

1.TDatabase组件1.1 AliasName用于描述连接所用的数据库别名。1.2 Connected用于确定数据库连接是否是活动的。1.3 DatabaseName用来指定DataBase组件所用的数据库的名字。1.4 Exclusive（只适用于Paradox或dBase）确定当前的应用程序可否独占地访问数据库。1.5 KeepConnection

1. Randomfunction Random [ ( Range: Integer) ];：产生一个0Random(10); //随机产生一个大于等于0小于10的数使用Random之前，要先用Randomize过程或RandSeed函数来初始化随机数产生器。 2. RandomFromfunction RandomFrom(const AValues: array o

1.New、Dispose、GetMem、FreeMemNewprocedure New(var P: Pointer);：创建一个新的动态变量，并把指针P指向这个新创建的变量。分配的内存大小由P指针表示的类型决定。Disposeprocedure Dispose(var P: Pointer);：用来释放一指针变量所占用的内存地址。如使用{$I+}，会产生一个EInvalidPo

1.Absfunction Abs(X);：返回指定数值的绝对值。例如：Abs(-15); //结果为15 2. Ceil、FloorCeilfunction Ceil(const X: Extended):Integer;：按正无穷大方向四舍五入一个变量。例如：Ceil(-2.8) = -2;Ceil(2.8) = 3;Ceil(-1.0) = -1;F

1. Incprocedure Inc(var X [ ; N: Longint ] );：整数自加N。其中，X为变量；N为要增加的长度。例如：D1 := 1;Inc(D1); //结果为2Inc(D1,2); //D1= D1 +2 结果为32. Oddfunction Odd(X: Longint): Boolean;：判断X的奇偶数。如果X为奇数，则返回tru

1. AnsiStrLower、AnsiStrUpperAnsiStrLowerfunction AnsiStrLower(Str: PChar): PChar;：将空终止字符串中的所有字符转换为小写字符。AnsiStrLower('ABCDEF'); //结果为abcdefAnsiStrUpperfunction AnsiStrUpper(Str: PChar): PCha

1.LeftStr（返回从字符串首开始指定长度的子字符串）function LeftStr(const AText: AnsiString; const ACount: Integer): AnsiString; overload;function LeftStr(const AText: WideString; const ACount: Integer): WideString; ov

1.strprocedure Str(X [: Width [: Decimals ]]; var S);：格式化一个字符串，并将结果返回给一个变量。With表示该参数设置转换后的字符串宽度；Decimal用于设置小数位数；S用于存储转换后的字符串。在实际使用中，可以用str来替换IntToStr。procedure TForm1.Button1Click(Sender : TObject

1.UpperCasefunction UpperCase(const S: string): string;：将字符串转换为大写，其返回的string类型{按回车时字符串变成大写}procedure TForm1.v_EditChrKeyPress(Sender: TObject; var Key: Char);begin if Key = #13 then be

今天我们来看一下Delphi的语句。一、常量声明语句和其他语言一样，常量在声明时就被赋值，且在程序执行过程中是不可改变的。常量用“=”表示两边的值是相等的。const Pi = 3.14159; Answer = 342; ProductName = 'Delphi'; 二、赋值语句这个语句最常用，在之前也介绍过。这里就

Delphi7中有许多对数据库操作的组件，他们因数据访问机制的不同而被分成四大类：1.BDE组件：使用Borland数据库引擎，它最擅长处理Paradox or dBASE表中的数据。但它的配置也是四个机制中最为复杂的；同时，BDE组件能与其它采用BDE组件的应用程序共享。在Delphi7的操作界面，我们能看到在BDE组件中包含TTable组件（用于通过BDE从物理数据库中获得数据，并经过TD

1. AssignFile、EraseAssignFileprocedure AssignFile(var F; FileName: string);：给文件变量连接一个外部文件名。这里需要注意的是AssignFile不能用在已打开的文件上。procedure TForm1.Button1Click(Sender: TObject);var text : String;

TDataSet类由TBDEDataSet（BDE组件）、TCustomADODataSet（ADO组件）、TIBCustomDataSet（InterBase组件）、TCustomSQLDataSet（dbExpress组件）和TCustomClientDataSet子类组成。下面介绍DataSet类中比较重要的属性（可能会有取舍，等到真正做项目用到的时候在进行补充）1.Active：判

1.在使用ADO组件将数据保存到SQL Server 2005时，遇到中文字体无法插入的情况。在Delphi7中报“application uses a value of the wrong type for the current operation”错误，这是因为在ADO组件在处理汉字时，默认类型设置不对，需要重新设置数据类型。例如：Parameters.ParamByName('CarT

异常常用在硬件、内存、I/O和操作系统错误中。try AssignFile(F,FileName); Reset(F);except on Exception do ...end;定义并声明一个异常：function StrToIntRange(const S:string;Min,Max: Longint) : Longint;begin

DBGrid组件DBGrid组件能以表格形式显示数据库中的数据。其主要属性有：1.1 Align用于设置TDBGrid组件在容器组件中的对齐方式。1.2 Columns确定该组件显示数据集时的列（列对应于数据库表的字段）1.3 DataSource确定和数据网络相关联的数据源对象（重要） 等到实际项目开发时用到了在做补充

这里，我们来介绍BDE组件中常用的几个组件：1.TTable组件使用TTable组件可通过BDE访问单个表的数据，其提供了对底层数据库的每一条记录和字段的直接访问。下面介绍几个重要的属性1.1 DataSource当TTable组件作为主从表体系中的从表时，通过这个属性可以获得和主表相关联的TDataSource组件。1.2 Exists判断底层的数据库表是否存在。1.

1.TDataSource组件TDataSource组件用于在DataSet（数据集）组件和数据控制组件之间提供一个连接的纽带。其主要属性有：1.1 AutoEdit：确定当一个和TDataSource组件相关联的数据控制组件得到焦点时，TDataSource组件是否自动调用下层数据集对象的Edit方法。（建议设置为false）1.2 DataSet：确定和TDataSource组件相

1. Addrfunction Addr(X): Pointer;：返回指定对象的地址。var I : Integer; NodeNumbers: array [0 .. 100] of Integer; begin with TreeView1 do begin for I := 0 to Items.Count - 1 do begin

1. Clipbrd函数function Clipboard: TClipboard;：若应用程序从未使用过剪贴板，则调用该函数形成新的剪贴板；若之前使用过剪贴板则返回使用过的剪贴板。属性： AsText：将剪贴版的内容作为一个字符串输出；方法：HasFormat：指示剪贴板中是否包含指定格式的数据。例如：procedure TForm1.Button1Click(Sender: TO

1.ForceDirectories、GetCurrentDir、GetDir、SetCurrentDirForceDirectoriesfunction ForceDirectories(Dir: string): Boolean;：在指定的目录中创建一个目录。其中参数Dir为创建目录的全名，必须包括上级目录。如创建成功则返回true；否则返回false。procedure TFor

今天我们来看一下Delphi的运算符：Delphi的运算符分为：@, not, and ^的一元运算符；*, /, div, mod, and, shl, shr, as, +, -, or, xor, =, >, , =, in, and is为二元运算符一、赋值运算符对于Pascal的新手来说，Delphi的赋值运算符和其它常用编程语言的赋值运算符不大一样，需要用:=来表示。例如：

Delphi的数据类型主要有以下这几类：简单数据类型(Simple)，字符串数据类型（String），结构数据类型（Struct），指针数据类型（pointer），函数和过程数据类型（procedural），变体数据类型（variant）等。下面我们来一一做一个介绍。一、简单数据类型简单数据类型分为有序数据类型（ordinal）和实数数据类型（real）两种。1.1 有序数据类型有

1.接口命名约定I起头，类是T起头的。IMyInterface1 = Interface function Func1:Integer; function Func2:Integer; end;2.接口都是从IInterfacej继承的，若是从根接口继承，则可省略 {定义继承接口的类} TMyClass = class(TInterfacedObject

在没有 Uncode 的时代, 用 256 个 ACSII 只是方便了英文, 其他文字怎么办?那时是各自为政的, 譬如中文就有: GB2312-80(国内简体)、Big5(台湾繁体)、HKSCS(香港繁体), 但它们互不兼容.GB2312(1980年) 后来升级到 GBK(1995年), 现在电脑上使用的是 GB18030(2000年), 这个系列是向后兼容的.区位码的概念

1.类的继承继承类的定义{父类} TBase = class procedure msg1; end; {继承父类} TChild = class(TBase) procedure msg2; end;对于子类与父类的使用与一般类的调用并没有特殊的区别，这里不再详述。在子类中，如果需要调用父类的方法，可以利用inherited指示字

1.类的方法参数可以分为四种（默认参数（传值）、var（传址）、out（输出）、const（常数））。这里需要注意的是var定义的参数，例如：{var参数是传址, 会被改变}function MyF2(var x: Integer): Integer;begin Inc(x); Result := x;end;Inc(x)：表示对x的内存地址加1，这将导致方法返回的

第一部分：var s: string;begin //指令类型 type s := Format('最大整数是: %d; 最小整数是: %d',[MaxInt,Low(Integer)]); //返回: 最大整数是: 2147483647; 最小整数是: -2147483648 { 提示: 格式指令必须以 % 开始, 不区分大小写, %d 代表一个整数; 第二个参数

uses HTTPApp, Masks;procedure TForm1.Button1Click(Sender: TObject);var ss,s: string;begin //先提取一个文件名的字符串 ss := Application.ExeName; ShowMessage(ss); //C:\Documents and Settings\wy\My Doc

Delphi常见错误代码及中文解释';' not allowed before 'ELSE'                                             ElSE前不允许有“;”'' clause not allowed in OLE automation section                   在OLE自动区段不允许“”子句'' is not

给字符串分配指针，我们马上可以联想到有以下这些函数可供选择：GetMemAllocMemReallocMemFreeMemGetMemoryReallocMemoryFreeMemoryNewDisposeNewStrDisposeStrStrNewStrAllocStrDisposeGlobalAllocPtrGlo

接口的属性1.接口属性的定义{此接口声明了一个 Name 属性; 因为接口没有字段, read/write 都只能从方法} IMyInterface = interface function GetName:string; procedure SetName(val:string); property name:string read GetName w

1.在编译时遇到“statement expected but procedure found”：在当前报错的procedure前，缺少了一个end结束标签。2.遇到“Unsatisfied forward or external declaration: 'TForm1.RadioGroupClick'”：一可能是方法中的代码有误；二则可能是重复定义了方法3.遇到“TStrings的Ab

首先我们来看一下属性的定义：TMyClass = class(TObject) private FName: string; procedure SetName(const Value: string); published property Name: string read FName write SetName; end;没有指定类型的

单元文件是我们在Delphi开发中最常用的文件，主要的代码编写都在该文件中进行。所以，我们有必要对其文件结构进行分析。一个单元文件主要有以下几部分组成：单元文件头部、接口部门、实现部分，前三者是最主要也是最常见的，还有就是initialization部分和finalization部分。1. unit heading例如：unit MainForm;结构，其中MainForm与该单元文件的文

1.类成员的可见性private //不可见protected //派生类可见public //可见published //可见。用于运行时信息automated //可见。用于兼容（只用于windows）在{$M+}状态下编译类时，它的默认可见性为published；否则，则它的可见性是public；2.类

1.类的虚方法（virtual）和动态方法（dynamic）方法的定义：TMyClass = class procedure Proc1(x,y: Real); virtual; //虚方法 function Fun1(x,y: Real): Real; virtual; procedure Proc2(x,y: Real); dynamic; //动态方法

1.结构与类都是自定义类型，结构可以直接使用，内存是自动管理；类对象需要创建才可以使用，并在使用完成后需要对其手动释放。例如type TMyRecord = Record d:TDate; end; TMyClass = class d:TDate; end;procedure TForm2.Button1Click(Sender: TObj

我们在用Delphi创建一个项目的时候一般会看到如下图所示的文件包含在项目文件夹中下面我来一一做一下介绍：.res文件——资源文件。{$R *.RES}这个语句是在项目文件中出现的，意思是调用该项目中存在的资源文件。你也可以创建自己的资源文件，调用语句为$R FileName.RES.pas文件——单元文件（这个也是我们用于代码编写的文件，单元名称与对应的文件名称相匹配，且单元

1.构造方法和析构方法我们都知道，构造方法是用来创建和初始化一个实例对象的方法；析构方法是在对象销毁时调用并释放内存。例如：TMyClass = class(TObject)public constructor Create; {构造方法} destructor Destroy; override; {析构方法}end;必须使用constru