| |

VB.NET - FortgeschritteneList(Of Point) gibt falschen Punkt zurück | |  | Autor: D_Old | Datum: 08.02.21 11:27 |
| Ich habe eine Liste (FeldListe) erstellt, die diverse Punkte aufnimmt. Die Punkte dienen dann später zum Zeichen von Shapes und Zurückgeben der Positionen bereits gezeichneter Shapes.
Das Erstellen der Punkte sieht im Prinzip folgendermaßen aus:
For i As Integer = 0 To 4
P = New Point(405, 315 - 90 * i)
FeldListe.Add(P)
Zeichne(c, P, 60)
Next
Zeichne ist eine Prozedur, die ein Ovalshape mit Fillfarbe c am Punkt P mit Breite und Höhe 60 (also einen Kreis) zeichnet.
Nach zwei solcher Schleifen befinden sich 8 Punkte in der FeldListe. Bis hierhin werden alle (in diesem Fall) acht Kreise korrekt gezeichnet und deren Koordinaten korrekt zurückgegeben. - Der nächste Punkt wird nicht innerhalb einer Schleife erstellt, denn er liegt nicht in einer Zeile oder Spalte mit anderen Punkten zusammen:
P = New Point(495, 45)
FeldListe.Add(P)
Zeichne(c, P, 60)
Und jetzt das Erstaunliche: Der Kreis wird an der richtigen Position gezeichnet, wenn ich aber die Position z.B. im Direktfenster abfrage, sieht das so aus:
?FeldListe(9)
{X = 405 Y = -45}
IsEmpty: False
X: 405
Y: -45
Meine Frage ist nun:
Wie kann es sein, wenn doch die Y-Koordinate des Punktes mit 45 festgelegt und der entsprechende Kreis korrekt gezeichnet wurde, dass bei der Abfrage des Punktes aus der FeldListe aus der Y-Koordinate 45 nun -45 wird?
Für eine Hilfe wäre ich sehr dankbar, denn das Projekt funktioniert nicht, wenn ich nach Erstellung der Ovalshapes diese nicht anhand ihrer Positionen identifizieren kann. |  |
 | Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.
Einloggen | Neu registrieren |
  |
|
sevAniGif (VB/VBA) 
Anzeigen von animierten GIF-Dateien
Ab sofort lassen sich auch unter VB6 und VBA (Access ab Version 2000) animierte GIF-Grafiken anzeigen und abspielen, die entweder lokal auf dem System oder auf einem Webserver gespeichert sind. Weitere InfosTipp des Monats Oktober 2025 Matthias KozlowskiUmlaute konvertierenErsetzt die Umlaute in einer Zeichenkette durch die entsprechenden Doppelbuchstaben (aus ä wird ae, usw.) Access-Tools Vol.1 
Über 400 MByte Inhalt
Mehr als 250 Access-Beispiele, 25 Add-Ins und ActiveX-Komponenten, 16 VB-Projekt inkl. Source, mehr als 320 Tipps & Tricks für Access und VB
Nur 24,95 EURWeitere Infos
|
|
|
Copyright ©2000-2025 vb@rchiv Dieter Otter Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.
Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel
|
|