Forum: Multimedia
Delphi
by dataspider,
23. Nov 2005
Hi Scorpion,
da kannst du noch etwas tüfteln. Ich hab mal in folgendem Beispiel auf dem Canvas eine Forms einen Test gemacht:
function TForm1.LinieDurchControl(AControl: TControl): Boolean;
Var
LinieX: Integer;
LinieY: Integer;
WertLinie: Extended;
WertBtnTopRight: Extended;
WertBtnBottomLeft: Extended;
Forum: Multimedia
Delphi
by dataspider,
23. Nov 2005
Auf was zeichnest du denn?
Frank
Forum: Multimedia
Delphi
by dataspider,
23. Nov 2005
Hi,
wenn sich ein Control auf dem Canvas befinden kann, ist ei wohl eine von TWinControl abgeleitete Komponente.
Somit solltest du mit der Funktion ControlAtPos ans Ziel kommen.
Cu, Frank