home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / pascal / das_buch / printer / prntest.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  1993-05-09  |  882 b   |  21 lines
  1. {$A+,B-,D+,E-,F-,G-,I-,L+,N-,O-,P-,Q-,R-,S-,T-,V-,X-,M 16384,0,0}
  2. (*===================================================================*)
  3. (*                            PRNTEST.PAS                            *)
  4. (*           Das Programm gibt einen Text auf dem Drucker aus        *)
  5. (*===================================================================*)
  6. PROGRAM PrinterTest;
  7.  
  8. USES
  9.   Printer;
  10.  
  11. BEGIN
  12.   WriteLn(Lst, #9'Diese Ausgabe wird an einen angeschlossenen');
  13.   WriteLn(Lst, #9'Drucker geschickt. Ist kein Drucker ange-');
  14.   WriteLn(Lst, #9'schlossen, wird automatisch der Druck in eine');
  15.   WriteLn(Lst, #9'Datei vorgenommen. Der Text kann dann später');
  16.   WriteLn(Lst, #9'mit COPY oder PRINT auf dem selben oder einem');
  17.   WriteLn(Lst, #9'anderen Rechner ausgedruckt werden.');
  18. END.
  19.  
  20. (*===================================================================*)
  21.