Registriert seit: 24. Jun 2008
Ort: Mallersdorf
9 Beiträge
Delphi 7 Professional
|
AW: TPrintPreview und SynPDF - unvollständige Ausgabe
24. Jan 2021, 19:04
Hallo, Roland !
Mir ist aufgefallen, daß Du bei drawtext das Textflag "TA_Left" übergibst, drawtext erwartet hier ein "Dt_Left"-Flag, ich könnte mir vorstellen, daß die beiden Werte nicht identisch sind.
Außerdem, drawtext schneidet Text ab, der länger ist als das lpRect, das kannst Du abstellen, wenn Du zusätzlich das TextFlag "Dt_Noclip" angibst.
Und, ich würde das Erstellen der Druckausgabe und des Pdf nicht in einer Prozedur abhandeln.
Im Anhang meine Lösung, allerdings nur in Delphi7.
Grüße
Sigi
|