Bild als String übertragen?

[sx2008]

Es gibt ja auch den TStringStream.
Damit wird's kurz & knackig:

Delphi-Quellcode:

function BitmapToString(Input: TBitmap): String;
var ms: TStringStream;
begin
  ms := TStringStream.Create('');
  try
    Input.SaveToStream(ms);
    Result := ms.DataSring;
  finally
    ms.Free;
  end;
end

Für die Umkehrfunktion bitte beachten, dass man dem StringStream im Konstruktor einen Inhalt mitgeben kann.