关于自定义类的问题,65分,全给了,急!!(65分)

  • 主题发起人 主题发起人 gravel
  • 开始时间 开始时间
G

gravel

Unregistered / Unconfirmed
GUEST, unregistred user!
我在delhpi中,定义了一个类:type Tshili=class
private
wu,m:integer;
w:array[1..30] of integer;
public
procedure initialize(gwu,gm:integer);
end;
我在initialize过程中,wu;=gwu; m;=gm;
可总是出错。怎样解决?
另:类的构造函数应怎样写?
 
wu:=gwu;
m:=gm
附值是冒号,不能是分号
构造函数
constructor Create(参数表.....);override;
 
你在调用Initialize前调用过Create没有?
 
同意 www 应该 create()
 
TShili是直接继承的TObject
它的构造函数应该这样来写
TShili = class
...
public
...
constructor Create;
end;

costructor TShili.Create;
begin
inherited Create;
...
end;

调用时必须先行调用其构造函数
AShili := TShili.Create;
AShili.Initialize(gwu, gm);
若想将Initialize合并到Create中时,则可这样来写
TShili = class
...
public
...
constructor Create(gwu,gm:integer);
end;

costructor TShili.Create(gwu,gm:integer);
begin
inherited Create;
wu:=gwu;
m:=gm;
...
end;

 
多人接受答案了。
 
后退
顶部