Zitat von
taktaky:
Ich habe das Problem gelöst nachdem ich Variable als global definiert habe
genau das solltest du nicht machen!
du solltest ein
property definieren.
Delphi-Quellcode:
protected
procedure SetSelRect(r:TRect);
published
property SelRect:TRect read fSelRect write SetSelRect;
..
procedure TDrawControl.SetSelRect(r:TRect);
begin
fSelRect:=r;
redraw;
end;
und dann von form1 aus über die instanzvariable setzen:
dc.SelRect:=Rect(0,0,100,50);
richtig lesen, mitdenken und ein bisschen mehr Eigeninitiative wären sehr wünschenswert...
HTH Frank