Druckerauswahl

[N30N]

Hi,

ich will ein Memofeld ausdrucken. Die Boardsuche hat mir schon sehr geholfen, jedoch gibt´s da noch ein kleines Problem. Wenn ich

Delphi-Quellcode:

procedure TPCDatenbank.DruckenClick(Sender: TObject);
var
  Zeile: Integer;
  PrintText: TextFile;
begin
  AssignPrn(PrintText);
  Rewrite(PrintText);
  Printer.Canvas.Font := Memo1.Font;
  for Zeile := 0 to Memo1.Lines.Count - 1 do
  Writeln(PrintText, Memo1.Lines[Zeile]);
  CloseFile(PrintText);
  end;

ausführe, dann wird automatisch auf dem Standartdrucker ausgedruckt. Ich möchte allerdings ein Auswahlfeld, so wie es normal erscheint: (Bild im Anhang)

Wie bekomm ich jetzt das Auswahlfeld hin?

[edit=sakura] Bild in Anhang verschoben. Bei solcher Größe... Mfg, sakura[/edit]