Delphi学习之函数参数修饰中的var 、out和const

<br />在网上看到这样的代码unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TTest = class pu

out与var都是传址参数。而out仅仅接受返回的值，对out的任何输入都会被忽略,其它的类似var。例如 procedure Hello(out s:String); begin s:=Hello,+ S; end; procedure TestOut; var s:String;

（1）var修饰符 添加var 是地址传递，会修改原有的变量 var s: string; begin S := 'Hello'; ChangeSVar(s); ShowMessage(S); end; // ChangeSVar 定义 procedure TForm1.ChangeSVar(var A: string); begi

出處 : http://blog.sina.com.cn/s/blog_6e9c16890100x1n9.html （1）var修飾符 添加var 是地址傳遞，會修改原有的變量 var   s: string; begin   S := 'Hello';   ChangeSVar(S);   ShowMessage(S); end; // ChangeSVar 定義 procedure

当定义字符串常量时，你可这样写： const AuthorName = 'Marco Cantù'; 从Delphi 3 开始，你可以用另一种方式写： resourcestring AuthorName = 'Marco Cantù'; 上面两个语句都定义了一个常量，也就是定义了一个在程序运行期间保持不变的值，但两者的实现过程却不同，用resourcestring 指令

Raise是用来抛出异常的！ constructor TBaseFactory.Create(const IID: TGUID); begin if FactoryManager.Exists(IID) then Raise Exception.CreateFmt(Err_IntfExists,[GUIDToString(IID)]); FIntfGUID:=IID; Fa

assigned 是用来判断某一指针(pointer)或过程引用是否为nil(空)，如果为空则返回假（false） function SysService:IInterface; begin if not Assigned(FSysService) then FSysService:=TSysService.Create; Result:=FSysService

Delphi 在使用ADOQuery时，有时会查询到null值 这个时候就是VarToStr发挥作用得时候了， ADOQuery1.Fields[0].Value在赋给string变量时，如果Value值是null就会报错 这个时候 使用：VarToStr(ADOQuery1.Fields[0].Value)  就没问题了！

var h,a,f: Cardinal; begin h := HInstance; a := Application.Handle; f := Self.Handle; ShowMessage(IntToStr(h)); {4194304} ShowMessage(IntToStr(a)); {13107942} ShowMessage(IntToStr(f)); {4260652} end;

写了一段时间的Delphi，发现有些基础的东西还没掌握好！于是重新复习了下基础知识。 枚举: 枚举定义    type wang=(标识符1, 标识符>, 标识符3,...) ; Demo:     type color = (red , green, blue, white); 这里面red, green,blue, white被称作枚举常量,并且已经

initialization —— 在单元中放在文件结尾前，包含用来初始化单元的代码，它在主程序运行前运行并且只运行一次。 finalization —— 在单元中放在 initialization 和 end. 之间，包含了单元退出时的代码。在程序退出时运行并且只运行一次。 initialization ShowMessage('1 ini');{单元初始化代码} finaliz

Delphi  子界 好吧，我承认我的Delphi水平还很低，因为看到这个名词的时候不知道它是到底什么。 直到... 子界,通俗的说就是标定一个下界和一个上界 格式如下:              .. 注意左边的一定要是下界，右边一定是上界，并且上下界必须是同一顺序的，下界是整数，那么上界也就必须也是整数，并且比下界大。 Demo：

type TFrmMain = class(TForm,IIntf1) 1.这行代码是什么意思： 这是继承， TFramMain类继承了TForm类和IIntf1接口。 var FrmMain: TFrmMain;  FrmMain类是TFrmMain类的实例化！

。。。

类方法就是能够通过类名就可以访问的方法 class procedure RegisterModule(Reg:IRegistry);override; class procedure UnRegisterModule(Reg:IRegistry);override; 这上面就是两个类方法！ 注意：    {   类方法不能在 private 和 protected