mit pdf-Tool nur Teil einen Stringgrid drucken

[tom_po]

bevor du geantwortet hast, habe ich selbst noch probiert und es so gemacht, dabei auch die Labelbreit geändert, passt jetzt wunderbar: (einfach mod und div in 3 geändert)

Delphi-Quellcode:

function LabelToPage(pt: Tpoint; index: Integer): TPoint;
const
  PageLeft = 20;   //Orig 20
  PageTop = 30;
  LabelWidth = 400;       //Original-Label-Masse   600 - 120
  LabelHeight = 120;
begin
  Result := Point(
              pt.X + PageLeft + (index mod 3) * LabelWidth,      //orig mod 2
              pt.Y + PageTop + (index div 3) * LabelHeight       //orig div 2
            );
end;

was meinst du?