自定义一个窗体基类,从TForm继承,如下写构造函数,但在使用时发现根本没执行TfrmBasic.Create;是不是TForm的strict private class constructor Create;起的作用?这块怎么理解?TfrmBasic = class(TForm)
private
{ Private declarations }
pnlRight: TPanel;
pnlLeft: TPanel;
pnlMain: TPanel;
pnlTop: TPanel;
protected
public
constructor Create(AOwner: TComponent);
{ Public declarations }
published
end;TMyForm = Class(TfrmBasic)
end;//使用代码:myForm := TMyForm.Create(nil); myForm.Show;
private
{ Private declarations }
pnlRight: TPanel;
pnlLeft: TPanel;
pnlMain: TPanel;
pnlTop: TPanel;
protected
public
constructor Create(AOwner: TComponent);
{ Public declarations }
published
end;TMyForm = Class(TfrmBasic)
end;//使用代码:myForm := TMyForm.Create(nil); myForm.Show;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货