Forum: Object-Pascal / Delphi-Language
by S4SH1981,
17. Sep 2020
Hallo Hoika,
zu Testzwecken drucke ich über den Windows 10 PDF Drucker.
Hier sehe ich aber keine Probleme.
Den von Dir verlinkten Code nutze ich bereits.
Über eine normalen Button druckt er mir auch das Bitmap.
Meine Frage ist allerdings, wo ich diesen in die PrintStringgrid Prozedur einfügen muss, dass es auch gedruckt wird.
Forum: Object-Pascal / Delphi-Language
by S4SH1981,
17. Sep 2020
Hallo an das Forum,
//StringGrid Inhalt ausdrucken
procedure PrintStringGrid(Grid: TStringGrid; Title: string;
Orientation: TPrinterOrientation);
var
P, I, J, YPos, XPos, HorzSize, VertSize: Integer;
AnzSeiten, Seite, Zeilen, HeaderSize, FooterSize, ZeilenSize, FontHeight: Integer;
mmx, mmy: Extended;
Footer: string;