在代码中使用Create创建了一个MDI子窗体，可是子窗体里不知用什么窗体名？(30分)

纸

纸老虎

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-28

• #1

我使用下列代码创建了子窗体。var
frmData: TfrmData;
begin
frmData:=TfrmData.Create(self);
end;
但在子窗体frmData中自定义一个过程时(代码如下)，使用"self","frmData"都不行，
怎么回事啊？
procedure InitForm();
begin
self.Top :=0;
self.Left :=0;
end;

 

O

OopsWare

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-28

• #2

Application.CreateForm(TfrmData, frmData);
或
frmData := TfrmData.Create(Application);
或
frmData := TfrmData.Create(nil);

 

纸

纸老虎

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-28

• #3

不行！使用名称，编译时能通过，但运行时要出错。

 

Z

zhumoo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-28

• #4

出什么错？

 

O

OopsWare

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-28

• #5

在类的实体未创建之前访问类的元素会跳出读零地址错误！

 

风

风中流云

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-28

• #6

procedure tfrmdata.InitForm();
begin
self.Top :=0;
self.Left :=0;
end;

 

0

0738

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-28

• #7

你查查看Iniform这个过程什么时候执行，如果在Create之前执行自然会出错的

 

F

Flintstone

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-28

• #8

你的MDI窗体为什么不用IDE先生成好呢？
在用Create方法，动态创建，显示？

 

久

久久

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-28

• #9

函数 InitForm 应该在该单元的 private 段声明先 之后才可以用该单元的
self。
…………
private
procedure InitForm();
…………
{$R *.DFM}
procedure tfrmdata.InitForm();
begin
self.Top :=0;
self.Left :=0;
end;