Hallo shmia,
das geht ja richtig flott! Super, dank Dir! Ich verstehe nur nicht, daß man einem String eine Länge zuweisen kann UND was das s[1] bei dem Einlesen bedeutet.
Beim setlength wird doch der "Array" auf eine die gewünschte Länge gebracht, d.h. er hat strom.size Felder. Beim Einlesen weist man doch mit s[1] auf das erste der Felder zu und nicht auf alles. Kannste das noch erklären, wenn Du Lust und Zeit hast ????
Mein Code sieht jetzt so aus:
Delphi-Quellcode:
procedure TDruckdateiblitz_Form.Button1Click(Sender: TObject);
var s : string;
var wert : char;
var i,laenge : longint;
var strom : tfilestream;
begin
strom := tfilestream.Create('d:\druck.prn',fmopenread);
try
SetLength(s, strom.Size); // Speicher beschaffen
strom.Readbuffer(s[1], strom.Size); //en-Block lesen
finally
strom.Free;
end;
rawprint(druckername.caption,'Hallo',s);
showmessage('Fertig!');
end;
Gruß,
quasinix