Dankeschön, habe die Lösung jetzt:
[code]
procedure Form1.IrgendeineProzedurWoDerCodeReinSoll;
var AnyRect: TRect;
begin
if IntersectRect(AnyRect, Image1.BoundsRect, Button1.BoundsRect) then
begin
Button1.Visible := False;
end;
end;
Ein Beispiel wie es funktionieren könnte.Habe ich von
hier.
Danke, dass du mir das Stichwort genannt hattest, wodurch ich die Suche nutzen konnte!
Mfg Ghostleader