PDA

View Full Version : LoadFrom/SaveTo Stream Error



cairnswm
21-06-2004, 06:40 AM
Hi All

Can anyone tell me why this code doesn't work...


procedure TForm1.FormCreate(Sender: TObject);
Var
Stream : TMemoryStream;
begin
Application.OnIdle := Form1.GameLoop;
Item := TGLXImageItem.Create(Nil);
Item.LoadTexture('C:\CairnsGames\Games\DGDev\GLXTr eem\Hut.bmp');
Item.TransparentColor := $FFFFFF;
Item.Transparent := True;
Item2 := TGLXImageItem.Create(Nil);
Stream := TMemoryStream.Create;
Item.SaveToStream(Stream);
Item2.LoadFromStream(Stream);
Stream.Free;
end;


The Line 'Item2.LoadFromStream(Stream);' gives me a 'Stream read Error'.

Also posted on the GLXtreem Forum.

cairnswm
21-06-2004, 11:44 AM
Andreaz posted an answer on the GLXTreem site.

I need to seek to start of stream before reading out of it.