Registriert seit: 7. Jan 2003
Ort: Menden
192 Beiträge
Delphi 7 Enterprise
|
Re: Drucken einer .txt Datei
26. Jan 2004, 02:23
Delphi-Quellcode:
var tmp : TStringlist;
begin
try
tmp := TStringList.Create;
tmp.LoadFromFile('Entsprechende Datei');
with Printer do begin
BeginDoc;
Canvas.TextOut(0, 0,tmp.text);
EndDoc;
end;
finally
FreeAndNil(tmp);
end;
end;
Christian Killing for peace is like fucking for virginity
Nightshade
|