资源文件调用出错(30分)

  • 主题发起人 主题发起人 angel725
  • 开始时间 开始时间
A

angel725

Unregistered / Unconfirmed
GUEST, unregistred user!
用记事本编辑资源文件,名子gif.rc
内容:mygif giffile1 "1.gif"
用brcc32.exe编辑成gif.res

在窗体1中加入一个image 一个button
在按钮的单击事件中写:
procedure TForm1.Button1Click(Sender: TObject);
var
Res:TResourceStream;
Gif:TGraphic;
begin
Res:=TResourceStream.Create(0,'mygif','giffile1');
Gif:=TGraphic.Create;
Gif.LoadFromStream(Res);
image1.Picture.Graphic:=Gif;
Res.Free;

end;

错误:
工程Project1.exe检测到错误类 EAbstractError,错误信息:'Abstract Error
not found'.进程中止。使用单步或运行继续运行。

怎么办,,哪错了??

(iamge能显示gif 了)


另外,这句:
mygif giffile1 "1.gif"  
写成这样:
mygif gif "1.gif"
这两句有区别吗,
 
用后一种写法。中间的'gif'指的是资源的类别。出错可能是由于程序无法确定'giffile1'指的是哪种资源。
 
原因是TGrapics是抽象类,不应该建立它的实例啊
应该用TGIFImage或TGifGraphic
 
试了,还是不行,

谁有例子啊,用资源文件加载gif图片的
搞不懂哪错了
 
mygif =》 128 ,用数字看
 
谁有例子,用资源文件加载gif图片的,能用的,给我一个看看。

mygif =》 128 什么 意思
 
多人接受答案了。
 

Similar threads

后退
顶部