Abfragen ob Picturebox irgendein Panel berührt und dieses Panel löschen

4typen · 10. August 2009, 21:53

Wie im Titel stehen bräuchte ich Hilfe bei einer Abfrage. In dieser Abfrage möchte ich wissen, ob eine Picturebox namens 'Ball' über einem wärend der Laufzeit erstelltem Panel ist und dieses Panel löscht. Wie stelle ich das am besten an?

FAtheone · 10. August 2009, 22:50

VB.NET-Quellcode

If PanelX.Bounds.IntersectsWith(Ball.Bounds) Then
PanelX.Dispose()
End If

Das sollte klappen.

Das Prinzip:

Wenn sich die Bounds-Rechtecke überschneiden, dann wird das Control gelöscht.
Die Rectangle-Klasse Stellt dazu die Funktion IntersectsWith bereit.
BTW: Für Punkte gibt es Contains

4typen · 11. August 2009, 16:57

nene, den Code hab ich ja schon, nur wie kann ich abfragen ob er über irgendeinem Panel ist also any panel oder so.

Konsolenwisser · 11. August 2009, 16:59

Vielleicht hilft dir das weiter:
vcware.de/kollision.php

4typen · 11. August 2009, 17:03

Man! Ich möchte wissen ob Das Bild über irgendeinem beliebigen Panel mit Namen unbekannt ist. Das kann sein Panel2 oder Panel57 oder Panel110 irgendein Panel wo ich den Namen nicht weiß

Lindi666 · 11. August 2009, 17:12

Du kannst für jedes Panel in "Me.controls" mit einer For Each Schleife überprüfen, ob es "intersected" und dann den Name zurückgeben.

//EDIT:

VB.NET-Quellcode

Private Function Blä(ByVal PicBox As PictureBox) As String
Dim name As String = "Nothing"
For Each P As Panel In Me.Controls
If PicBox.Bounds.IntersectsWith(P.Bounds) = True Then
name = P.Name
Exit For
End If
Next
Return name
End Function

4typen · 11. August 2009, 17:16

Danke ich werds versuchen.

Lindi666 · 11. August 2009, 17:17

naja ich war mit meinem Edit zu langsam

//EDT:

Achja, du kannst auch gleich das Panel zurückgeben, dann kannst damit anstellen was du willst (löschen, name, etc...)

4typen · 11. August 2009, 17:37

Beim Debug start bekomme ich folgende Meldung:
"Das Objekt des Typs "System.Windows.Forms.PictureBox" kann nicht in Typ "System.Windows.Forms.Panel" umgewandelt werden."

Ball ist halt ne Picturebox und soll überprüfen ob es ein panel berührt. Weiß jemand wie ich den Fehler umgehen kann?

xCM2x · 11. August 2009, 19:46

Du musst einfach nur die oben gepostete Funktion mit der PictureBox aurufen die deinen Ball anzeigt, also z.B.:

Blää(PictureBox_Ball)

und dann bekommst du zurück ob die PB irgendein Panel überschneiden, und wenn ja den Namen des Panels.
Ich versteh jetz dein Problem nicht. :huh:

FAtheone · 11. August 2009, 23:20

Du gehst ALLE Control durch, nicht nur Panels.

Wenn die Panels Standardbenannt sind (Panel1 .. PanelXXX), dann füge den Kollisionscode in folgenden If-Block ein:

VB.NET-Quellcode

For Each PanelX As Control In My.Controls
If PanelX.Name.Contains("Panel") Then
'Kollision -> Löschen
End If

Dein code hat nämlich versucht, eine PictureBox zu überprüfen, ist aber davon ausgegangen, dass es sich bei allen Controls um Panels handelt.

Abfragen ob Picturebox irgendein Panel berührt und dieses Panel löschen

Abfragen ob Picturebox irgendein Panel berührt und dieses Panel löschen

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

Ähnliche Themen

2 Benutzer haben hier geschrieben