Kleines Verschlüsselungs-Programm

[Luckie]

Ich auch:

Delphi-Quellcode:

with Printer do 
  begin 
    BeginDoc; 
    Canvas.TextRect(Rect(200,200,PageWidth-200,PageHeight-200), 
                    200, 200, Memo1.Lines.Text); 
    EndDoc; 
  end; 
  MessageDlg('Druckauftrag wurde gesendet!', 
  mtinformation, [mbOk], 0);

Vorher weißt du, dass das Dokument an den Drucker gesendet wurde? Wie überprüfst du das?