Moin,
Woher kommt denn sTitle? Im ersten Beispielcode heißt das Title und ist ein Parameter, der an die Druckroutine übergeben wird.
Delphi-Quellcode:
procedure PrintGrid(sGrid: TStringGrid; sTitle: string);
var
X1, X2: Integer;
Y1, Y2: Integer;
TmpI: Integer;
F: Integer;
TR: TRect;
begin
Printer.Title := sTitle;
Delphi-Quellcode:
procedure TForm1.MI_DruckenClick(Sender: TObject);
begin
PrintGrid(StringGrid1, 'Print Stringgrid');
end;
sTitle ist einer der beiden Übergabeparameter.
Upps, habe den Code aus dem falschen Browserfenster übernommen. Moment ich binde den anderen nochmal ein ...
Gruß HEiko