Einzelnen Beitrag anzeigen

franktron

Registriert seit: 11. Nov 2003
Ort: Oldenburg
1.446 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#4

AW: Fastreport PDF Erstellen stürtzt ab

  Alt 3. Aug 2018, 13:45
Zitat:
Hier der Code an dem ich glaube das das Problem liegt.
Delphi-Quellcode:
with v2 do
  begin
    Left:= -(report.Pages[1] as TfrxReportPage).LeftMargin * fr01cm;
    Top:= -(report.Pages[1] as TfrxReportPage).TopMargin * fr01cm;
    Width:= (report.Pages[1] as TfrxReportPage).PaperWidth * fr01cm;
    Height:= (report.Pages[1] as TfrxReportPage).PaperHeight * fr01cm;
  end;
Left, Top, Width, Height... soll der Compiler die aus v2 oder der Form benutzen? Das ist genau ein Beispiel warum man with wegläßt.
Das script ist aus einer Unit und keine Form weit und breit
Frank
Tux sein Lieblingsquellcode
While anzfische<TuxSatt do begin
Fisch:=TFisch.Create; Tux.EssenFisch(Fisch); Fisch.Free;inc(anzfische); end;
  Mit Zitat antworten Zitat