种植眉毛失败的人:delphi中资源文件调用

来源:百度文库 编辑:神马品牌网 时间:2024/05/03 08:38:01
我定义了一个资源言语件,名子gif.res
里面是这样定义的
mygif gif 1.gif
那我在程序要怎么调用,才能让它显示在image中
不是不好使..是出错了,
用记事本编辑资源文件,名子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','gif');
Gif:=TGraphic.Create;
Gif.LoadFromStream(Res);
image1.Picture.Graphic:=Gif;
Res.Free;

end;

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

怎么办,,哪错了??

要在delphi7中显示动态的GIF,可以使用TrxGifAnimator控件。
N年后才回答你的问题,可能有点太迟了。