[leon2009]

на много проще все

Код:

Image: TImage;
Stream: TStream;
Memo: TMemo;
  begin
  Stream := ClientDataSet1.CreateBlobStream(ClientDataSet1.FieldByName('name'), bmRead);
  try
    Image1.Picture.Bitmap.LoadFromStream(Stream);
    //Memo.Lines.LoadFromStream(Stream); 
  finally
    Stream.Free;
  end;

это работает только на локалке, если фотки с адресм http://foto.html = то я еще пробую