自定义窗体为什么不能创建

[luxiaoban]

代码如下：

//.........
//.........
TXForm = class(TForm)

end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
var Form: TForm;
begin
form := TXForm.Create(self);
end;

运行后出错：
Resource TXForm not found;
请教高手是什么原因？

[chechy]

用CreateNew试试。你的TXForm没有相关的资源。
Form := TXForm.CreateNew(Self, 0);

[王集鹄]

//作一个窗体代码文件
{$R XForm.DFM}

[qiubolecn]

procedure TForm1.Button1Click(Sender: TObject);
var Form: TForm;<-----------------------------这一句有问题，改成var form:txform
begin
form := TXForm.Create(application);
end;

[jianghuxiaozi]

form := TForm.Create(self);