hallo,
ich habe 2 Panels, welche ich auf Align = alLeft gesetzt habe, und dazwischen einen Splitter ebenfalls auf Align = alLeft.
Wenn ich nun diesen Splitter verschiebe, verändere ich im OnMove Ereignis des Splitters die Panelgrößen mit folgendem Code:
Delphi-Quellcode:
procedure Resize_MainPanel(Main1 : TPanel; Main2 : TPanel; Splitter : TSplitter; MainForm : TForm);
var Breite : integer;
begin
Breite := MainForm.Width - Splitter.Width;
Main2.Width := MainForm.Width - Splitter.Width - Main1.Width;
end;
Nun habe ich folgendes Problem, dass wenn ich den Splitter nach dem ziehen loslasse, sich desen Position auch zu verändern scheint, und ich dann von der neuen Position aus nur nach links und nicht mehr weiter nach rechts vergrößern / verkleinern kann.
ich hoffe das Problem verständlich beschireben zu haben? Wer hat ne Lösung dafür?
LG Marco!