Vorschau beim PrintDialog in FMX

[himitsu]

Erstmal kommt es auch darauf an, in welchem System dieser Dialog aufgeht.
Windows, Android, OSX, ...

Für Windows landet es am Ende bei PrintDlg/PrintDlgW,
siehe TFMXDialogService.DialogPrint in FMX.Dialogs.Win.pas

In der Doku sehe ich aber nicht, wie man dort ein Image übergeben könnte
und eine Suche fand auf die Schnelle auch nichts.

TPrintDialog selbst bietet auch nichts an.

Da für die Anzeige auf das Printer-Handle zugegriffen wird,
wäre ich mal auf die saublöde Idee gekommen,
einfach was auf den Drucker-Canvas zu malen und auszuprobieren, ob man das dort sieht.

Delphi-Quellcode:

Printer.BeginDoc;
//Printer.NewPage;
Printer.Canvas.DrawLine(PointF(0, 0), PointF(500, 500), 50);
if TPrintDialog.Create(Self).Execute then
  ...;
Printer.Abort;

Aber schon beim BeginDoc geht hier vom PDF-Drucker sofort der Speichern-Dialog auf.