Objekte in einer TControlBar nur untereinander verschieben erlauben?



  • Hallo zusammen,
    habe ein TControlBar auf mein Formular gezogen, Align auf Left gesetzt.
    Dort hinein habe ich 5 TLabels gezogen.

    Nun kann man ja die Labels im fertigen Programm verschieben.

    Ich möchte verhindern, daß sie nebeneinander verschoben werden können.
    Sie dürfen nur untereinander liegen!

    Ich weiß nicht wie... 😕 Könnt ihr helfen?



  • Du könntest die Top und Left Eigenschaften der Labels prüfen. Wenn Left>11 (oder so) ist, liegen sie nicht am linken Rand. Wenn bei mehreren Labels Top gleich ist, liegen sie in der gleichen Zeile. Danach entsprechende Korrekturoperationen ausführen.


Anmelden zum Antworten