ClientDataSet image field yükleme (DataSnap)

[yemre]

(24-01-2023, Saat: 09:35)RAD Coder Adlı Kullanıcıdan Alıntı: DB den bir fotoğrafı alıp, göstermek:

var
  msFoto: TMemoryStream;
begin
 msFoto := TMemoryStream.Create;
 try
   TBlobField(FDMemTable1.FieldByName('FOTO')).SaveToStream(msFoto);
   msFoto.Position := 0;
   Image1.Picture.LoadFromStream(msFoto);
 finally
   msFoto.Free;
 end;
end;

Resmi DB ye kaydetmek:

var
  msFoto: TMemoryStream;
begin
 msFoto := TMemoryStream.Create;
 try
   FDMemTable1.Append;
   TBlobField(FDMemTable1.FieldByName('FOTO')).LoadFromFile('D:\Download\abc.png');
   FDMemTable1.Post;
 finally
   msFoto.Free;
 end;
end;

 
External Exeption 0. Hatası alıyorum acaba göstermek istediğim image'nin boyu önemli mi ?