Hallo Alle!
Wieso klappt diese Abfrage nicht? Ich habe auf einer Form einige TImages erzeugt (Mein_Bild[A]).
Ein anderes TImage verschiebe ich mit der Maus über die Form. Wenn ich hierbei über ein erzeugtes
TImage komme, soll dieses verschwinden.
Delphi-Quellcode:
For A := 0 To 100 do
begin
If IntersectRect(lSectionRect, Mein_Bild[A].BoundsRect, Image1.BoundsRect) Then
begin
Mein_Bild[A].Visible := False;
end;
end;
Bei dieser Abfrage bekomme ich immer eine Zugriffsverletzung.Was mache ich da falsch.
Gruß
Heike