Splitter verschieben ohne Maus

[Stefan Bachmann]

Hallo

Ich habe folgende Komponenten auf einem Form:

Panel1, Align=alLeft
Splitter1, Align=alLeft
Panel2, Align=alClient

Zur Laufzeit mit der Maus den Splitter zu verschieben ist kein Problem, aber geht das auch mit Code? Der Eigenschaft Left einen Wert zuzuweisen, funktioniert nicht (jedenfalls nicht wenn die Align-Eigenschaft der Panels nicht auf alNone geändet wird, was ich nicht möchte).

Weiss jemand eine Lösung ?

[Günther Weber]

Du mußt nicht den Splitter, sondern Panel1.Width verändern