Danke dir erstmal .. mein Problem ist aber vorerst noch rein Delphi-technisch , bei der eigentlichen Übertragung bin ich noch nichtmal :>
Kleine Veranschaulichung , wo mein Problem liegt (ohne das Brimborium drumherum mit Create/Free etc.):
TStringList
Delphi-Quellcode:
//jpg enthält ein normales JPG-Bild
stream := TMemoryStream.Create;
jpg.SaveToStream(stream);
stream.Position := 0;
memo1.Lines.LoadFromStream(stream);
// jetzt enthält Memo1 lediglich: ÿØÿà
Ich brauche ansich erstmal einfach eine byte für byte gleiche Abbildung von Text und Dateicode hintereinander...
Das, was in PHP in etwa wie folgt aussehen würde:
PHP-Quellcode:
echo "Test-Text\n";
$fp = @fopen("bild.jpg","r");
while($line=fgets($fp))
{
echo $line;
Flush();
}
fclose($fp);
Das gäbe, etwa in einem Webbrowser ausgegeben, erst den String und dann die kompletten Bilddaten - und könnte die speichern (auch wenns da wenig Sinn macht).
In Delphi will ich das selbe .. nur in einer Datei gespeichert, ohne vorherige Anzeige.
Grüße