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
             
            
              
              
              
            
            
           
          
            
            
              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