Statusbar Text, Panelbreite

[OG Karotte]

Delphi-Quellcode:

procedure TDeineForm.DeineStatusbarResize(Sender: TObject);
begin
  with DeineStatusbar do begin
    Panels[0].Width := 50; // Feste Breite links
    Panels[2].Width := 50; // Feste Breite rechts
    Panels[1].Width := DeineForm.Width - Panels[0].Width - Panels[2].Width; // Variable Breite in der Mitte
  end;
end;

Das sollte funktionieren...

[Edit] Uups, zu langsam und kein roter Kasten [/edit]