怎样在调用资源文件中的jpg文件（在线急等）!(50分)

我在资源文件中有t1.jpg
$R *.dfm}
{$R 1.res}

procedure TForm1.FormCreate(Sender: TObject);
var
Fjpg:TJpegImage;
FStream:TResourceStream;
begin

Fjpg :=TJpegImage.Create ;
FStream := TResourceStream.Create (Hinstance,t1,jpeg);
FJpg.LoadFromStream (FStream) ;
Image1.Picture.Bitmap.Assign (FJpg);
end;

运行时总提示var下第一行出错。不明白，请高手指点！！！！！！！！！！

有没Uses JPEG?

uese jpeg;

Uses JPGE

多看看DELPHI的帮助，会对你有帮助

为什么我把gif分解为一张张图片,然后循环调用系统会变的很慢很慢!需要做怎样的处理!!!!