Druckrand

Computer: Software & Programmierung Delphi & Pascal
#1

Hallo,

folgenden Quelltext habe ich sinngemäß zum Drucken geschrieben:

var f:Textfile;
begin
 assignprn(f);
 rewrite(f);
 writeln(f,'Hallo Welt');
 closefile(f);
end;

Das klappt soweit ganz gut. Wie aber kriege ich den verdammten Druckrand hin, damit ich die Ausdrucke abheften kann?

Vielen Dank im voraus

Jenson

#2

Hallo,

var f:Textfile;
begin
assignprn(f);
rewrite(f);
writeln(f,‚Hallo Welt‘);
closefile(f);
end;

leider schreibst du nicht, welches Programmiersystem du verwendest. Wenn es Delphi ist, solltest du besser das Printer-Objekt verwenden. Ansonsten kanns du natürlich einfach ein paar Leerzeichen oder Tabs (= chr(9)) vor jeden gedruckten Text setzen:

write(f,' ');
writeln(f,'Hallo Welt');

Gruss, Niels