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

yuzhiyong 2004-05-08 10:00:49
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.
...全文
172 9 点赞 打赏 收藏 举报
写回复
9 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
yuzhiyong 2004-05-14
没人知道!我还是用模板算了.
  • 打赏
  • 举报
回复
yuzhiyong 2004-05-09
up
  • 打赏
  • 举报
回复
yuzhiyong 2004-05-08
1.我有在加Uses中加入UMyVCL单元;
2.工程中也添加了UMyVCl单元;
我上面的代码都有呀!?
  • 打赏
  • 举报
回复
ckendy 2004-05-08
bl:=TMyForm.Create(nil); 改为bl:=TMyForm.Create(self);
你的TMYFORM继承了什么?
  • 打赏
  • 举报
回复
qiume 2004-05-08
UMyVCL单元中定义了TForm继承过来TMyForm的类

// uses UMyVCL
  • 打赏
  • 举报
回复
qiume 2004-05-08
找到包含 TMyForm 的单元,加到工程中
  • 打赏
  • 举报
回复
yuzhiyong 2004-05-08
UMyVCL单元中定义了TForm继承过来TMyForm的类
  • 打赏
  • 举报
回复
hch_45 2004-05-08
TMyForm 单元名.dfm有没有存在?
  • 打赏
  • 举报
回复
lxftwo 2004-05-08
改一下:
bl:=TMyForm.Create(nil); 改为bl:=TMyForm.Create(self);
  • 打赏
  • 举报
回复
相关推荐
发帖
Delphi
加入

4972

社区成员

Delphi 开发及应用
申请成为版主
帖子事件
创建了帖子
2004-05-08 10:00
社区公告
暂无公告