✔ Denkanstoß/Problem...Punkte auf einer Karte auswählen!

[daddz]

Das mit ZOrder klappt irgendwie nicht. Die Label funktion sieht jetzt so aus:

Private Sub NeuesLabel(ByVal lngTop As Long, ByVal lngLeft As Long, ByVal iCap As Integer)
    Load Me.DeinLabel(Me.DeinLabel.UBound + 1)
    Me.DeinLabel(Me.DeinLabel.UBound).Top = lngTop
    Me.DeinLabel(Me.DeinLabel.UBound).Left = lngLeft
    Me.DeinLabel(Me.DeinLabel.UBound).Caption = iCap
    Me.DeinLabel(Me.DeinLabel.UBound).Visible = True
    Me.DeinLabel(Me.DeinLabel.UBound).ZOrder 0
End Sub

@Operator_Jon:
Ja da muss Text drin sein! Undzwar immer der jeweilige Index

greetz
daddz

 

[Operator_Jon]

Würde ZOrder funktionieren, könnte man auch auf der Form ein Label vor eine Imagebox schieben, aber das funktioniert ja nicht

Was natürlich recht umständlich aber möglich wäre, ist für jedes Label ein Frame erstellen..

Naja, nicht grade die beste Lösung ._.

 

[Merlin_78]

Hi daddz,

also bei mir klappts.

Mögliche Ursachen könnten sein:
a) die Koordinaten sind außerhalb des sichtbaren Bereichs der PictureBox
b) die ScaleMode-Eigenschaft steht auf Pixel und du arbeitest mit Twips-Werten

an Operator_Jon:
klar geht das mit ZOrder. Er hat das Original ja in der PictureBox plaziert. Nur wenn er es außerhalb der Box gemacht hätte ginge es nicht.

 

[Operator_Jon]

Ach , klar, war ein wenig müde gestern

 

[daddz]

Danke! Habs hinbekommen! Der Fehler war, das ich das Label neben der PictureBox erstellt habe und dann erst draufgezogen hab!

Vielen Dank nochmal

greetz
daddz