[FMX] Splitter in einem bestimmten Bereich verschieben

[Volker Z.]

Hallo,

ich würde mal die Eventhandler Splitter1MouseLeave und Splitter1MouseMove löschen, und es mit

Delphi-Quellcode:

procedure TForm1.Panel2Resize(Sender: TObject);
begin
  if Panel2.Width > LeftClientWidth then
    Panel2.Width := LeftClientWidth
end;

versuchen

Gruß