一个不会的问题,望高手帮助! ( 积分: 100 )

  • 主题发起人 主题发起人 zpselect
  • 开始时间 开始时间
Z

zpselect

Unregistered / Unconfirmed
GUEST, unregistred user!
我自已写了一个继续于Form的类,我在点击Button1时,将这个类显示出来,请问怎么显示?
type Tfrm=Clase(From);
private
....
Public
...
end;
 
procedure TForm1.Button1Click(Sender: TObject);
var
frm: Tfrm;
begin
frm:=Tfrm.Create(self);
try
frm.ShowModal;
finally
frm.Free;
end;
end;
 
接个分吧,已经回答了。
 
呵呵,来迟了,接点分用用
 
天哪,我看错了,尽然是100分啊!!!!!!!晕死啊!
 
真是好背,本来只给10分的,可是一下子忘记选分了,系统默认就是100分!!!!严重抗议:大富翁将系统分数设为100分,我都被错过几次了,原先可用分数500多分了,就那么变成了100多分了!
 
后退
顶部