Hallo ssach,
Du könntest z.B. die Anzahl der Ausdrucke so lösen:
Delphi-Quellcode:
PROCEDURE TForm1.Button1Click(Sender: TObject);
VAR
i : Integer;
BEGIN
IF PrintDialog1.Execute THEN
BEGIN
FOR i := 1 TO PrintDialog1.Copies DO
PrintStrings(Memo1.Lines);
END;
END;
die anderen Einstellungen des Dialogs kann man (zumindest bei mir)
nicht verändern, die Eigenschaften des jeweiligen Druckers werden
durch den Druckertreiber gelöst und "greifen" sowiso.