DELPHI的构造涵数和析造涵数

Question

第一个问题:DELPHI的构造涵数和析造涵数在那里呀
第二个问题我想写一个类不知道在那里写呀请各位给一个小例字呀

Answer 1

构造涵数 constructor
析造涵数destructor在哪写都行

Answer 2

以constructor关键字打头的函数都是构造函数，函数名不一定是create，但习惯上定为create
同样，以destructor打头的函数是析构函数，建议看一下vcl源代码就清楚了；声明类也有作用范围，即可见性的问题，一般写在单元的type部分，对整个单元可见

Answer 3

to ppayun(狗狗鱼) vcl源代码在那里可以看到

Answer 4

vcl源码就在你得delphi目录下呢，
按着ctrl键，随便点击哪个类，都可以慢慢得向父类上走。

Answer 5

在Delphi安装路径下有个Source文档，下面就有。比如我的路径就是E:\Program Files\Borland\Delphi6\Source\Vcl

Answer 6

我新建一个单元UNIT3
UNIT UNIT3;
INTERFACE
 USES CLASSES;
TYPE
 TAAA=CLASS;
END;
IMPLEMENTATION
END.
我这样写有错误呀

Answer 7

UNIT UNIT3;
INTERFACE
 USES CLASSES;
TYPE
 TAAA=CLASS//此處不應有分號﹐這是個語法錯
END;
IMPLEMENTATION
END.

Answer 8

TO gaozhu2003(炬) 
UNIT UNIT3;
INTERFACE
 USES CLASSES;
TYPE
 TAAA=CLASS
 PRIVATE
 F:INTEGER;
PUBLIC
CONSTRUCTOR CREATE;
DESTRUCTOR DESTRORY;
END;
IMPLEMENTATION
 CONSTRUCTOR TAAA.CREATE;
   BEGIN
    F:=6;
   END;
 DESTRUCTOR TAAA.DESTRORY;
   BEGIN
    F:=0;
   END;
END.然后我调用它出现错误呀
USES UNIT3;
VAR
 SS:TAAA;
BUTTON的CLICK事件
EDIT2.TEXT:=INTTOSTR(SS.CREATE)请指教呀

Answer 9

INTERFACE
 USES CLASSES;
TYPE
 TAAA=CLASS
 PRIVATE
 F:INTEGER;//这是私有的。不能直接访问
PUBLIC
CONSTRUCTOR CREATE;
DESTRUCTOR DESTRORY;
function getf:integer;
END;
IMPLEMENTATION
 CONSTRUCTOR TAAA.CREATE;
   BEGIN
   inherited Create;
    F:=6;
   END;
 DESTRUCTOR TAAA.DESTRORY;
   BEGIN
   inherited destroy;
   END;
function taaa.getf:integer;
begin
 Result:=f;
end;
END.USES UNIT3;
VAR
 SS:TAAA;
BUTTON的CLICK事件
ss:=TAAA.CREATE;
EDIT2.TEXT:=inttostr(ss.getf);
ss.Free;