.. das linke Feld -- Alignment alLeft
.. das mittlere -- Alignment alNone
.. das rechte Feld -- Alignment alRight
und ein wenig rechnen:
Delphi-Quellcode:
// Panel3 == mittleres Panel
procedure TForm1.Panel1Resize(Sender: TObject); // linkes Panel
begin
(sender as TPanel).Width := Panel3.Left;
end;
procedure TForm1.Panel2Resize(Sender: TObject); //rechtes Panel
begin
(Sender as TPanel).left := Panel3.Width + Panel3.Left;
end;
Grüße
Klaus