高分求助!帮我看看代码!我想把一个窗口做成一个类,窗口上有一个label,label的值在调用这个类的时候传入,应该怎么做,谢谢!
Iris 2003-08-18 05:23:59 type里面有如下定义:
TerminateForm=class(TForm)
private
libing : TLabel;
end;
然后:
procedure TForm1.Button4Click(Sender: TObject);
var
haha:TerminateForm;
begin
haha.Show;
haha.libing.Caption:='welcome ! ';
end;
怎么点完button4没有反应,haha.show在做什么,怎么没show出来!