Solltest die Prozedur im Interface-Teil "ankündigen":
Delphi-Quellcode:
type
TForm1 = class(TForm)
procedure PrepareReport(frmRep: TForm);
... und in der eigentlichen Prozedur den Namen der Form ergänzen:
Delphi-Quellcode:
procedure TForm1.PrepareReport(frmRep: TForm); // vorausgesetzt deine Form heißt Form1
var strFile: string;
begin
with frmRep do begin
QRShape1.Brush.Color := GetColor('RepUp');
QRShape1.Pen.Color := GetColor('RepUp');
QRShape2.Brush.Color := GetColor('RepDown');
QRShape2.Pen.Color := GetColor('RepDown');
end;
end;
WICHTIG: Den formalen Paramter
frmRep brauchst du dann nicht mehr!