HOW TO PRINT IN A HURRY

If you want to print text in a hurry without fancy formatting or setting up, try something like: 

var
  f : TextFile;
begin
  AssignFile( f, 'LPT1' );
  Rewrite( f );

  //
  // do your printing here...
  //
  WriteLn( f, 'hello, world!');

  CloseFile( f );
end;

comments