为什么提示"Resource TMyForm not Found"?

[yuzhiyong]

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, XPMan, UMyVCL;

type
TForm1 = class(TMyForm)
Button1: TButton;
Label1: TLabel;
XPManifest1: TXPManifest;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var bl: TMyForm;
begin
bl:=TMyForm.Create(nil); //提示"Resource TMyForm not Found"?
bl.Showmodal; //请问是什么问题?如何解决?
freeandnil(bl);
end;

end.

[lxftwo]

改一下：
bl:=TMyForm.Create(nil); 改为bl:=TMyForm.Create(self);

• 打赏
• 举报

回复 赞

[hch_45]

TMyForm 单元名.dfm有没有存在？

• 打赏
• 举报

回复 赞

[yuzhiyong]

UMyVCL单元中定义了TForm继承过来TMyForm的类

• 打赏
• 举报

回复 赞

[qiume]

找到包含 TMyForm 的单元，加到工程中

• 打赏
• 举报

回复 赞

[qiume]

UMyVCL单元中定义了TForm继承过来TMyForm的类

// uses UMyVCL

• 打赏
• 举报

回复 赞

[ckendy]

bl:=TMyForm.Create(nil); 改为bl:=TMyForm.Create(self);
你的TMYFORM继承了什么？

• 打赏
• 举报

回复 赞

[yuzhiyong]

1.我有在加Uses中加入UMyVCL单元;
2.工程中也添加了UMyVCl单元;
我上面的代码都有呀!?

• 打赏
• 举报

回复 赞

[yuzhiyong]

up

• 打赏
• 举报

回复 赞

[yuzhiyong]

没人知道!我还是用模板算了.

• 打赏
• 举报

回复 赞