请问为何TForm的width属性在程序的运行时不能实时反映form的大小(200分)

P

Phelan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-23

• #1

请教各位
请问为何TForm的width属性在程序的运行时不能实时反映form的大小

 

Y

YoungSun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-23

• #2

刚试了一下,没问题呀:
procedure TForm1.FormResize(Sender: TObject);
begin
self.Caption :='width:'+ inttostr(self.Width);
end;

 

青

青铜三代

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-23

• #3

up

 

T

tianjh007

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-23

• #4

把你的代码写出来看看

 

老

老人家

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-23

• #5

up

 

T

txmaster

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-23

• #6

没问题的啊。这样也行：
Caption := Format('Width = %d',[Width]);

 

P

Phelan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-24

• #7

谢谢各位相助,

我发现问题在于我是用了form1.width 而不是 self.width