Treeview und max. Breite

[s-off]

Dann habe ich Dich doch nicht richtig verstanden - dachte, Du regelst das per Drag'n'Resize, aber egal

Mit Splitter geht's natürlich ganz anders und viel einfacher:

Delphi-Quellcode:

procedure TForm1.Splitter1CanResize(Sender: TObject; var NewSize: Integer;
  var Accept: Boolean);
begin
   if NewSize > Form1.Width div 4 then
      Accept := False
   else
      Accept := True;
end;