I am attempting to download a JPG image, using FTP, and put it into a
TImage. This is the code:
------------------------------------------------------------
Procedure TForm1.btnGetOnceClick(Sender: TObject);
Var
TempStream: TMemoryStream;
JPG: TBitmap;
Begin
TempStream := TMemoryStream.Create;
JPG := TBitmap.Create;
Begin
FTP.Get('test.jpg', TempStream, True);
TempStream.Position := 0;
Image1.Picture.Bitmap.LoadFromStream(TempStream);
End;
TempStream.Free;
End;
-----------------------------------------------------------
It fails at the LoadFromStream instruction with the exception
EInvalidGraphic "Bitmap image is not valid"
Any help?
Thanks....... Jim
