Hi,
ich möchte im OnPrint der rvSystem Komponente (Delphi2010) Trennlinien einfügen. Warum kann ich hier nicht einfach im Canvas zeichnen.
Folgendes wird zwar kompiliert, aber die Linie wird nicht gezeichnet.
Delphi-Quellcode:
procedure TForm1.RvSystem1Print(Sender: TObject);
var
Report: TBaseReport;
begin
Report := TBaseReport(sender);
Report.Units := unMM;
//..Daten schreiben..
//Zeichnen geht nicht
Report.Canvas.Pen.Color:= clBlack;
Report.Canvas.Pen.Width:= 4;
Report.Canvas.MoveTo(1,1);
Report.Canvas.LineTo(100,100);
end;
Kann mir hier bitte jemand einen kleinen Tipp geben?
Gruß
Thomas