Hallo Max,
folgende Anregung für das Statusbar OnResize-Event...
Delphi-Quellcode:
procedure TfoTest9.StatusBar1Resize(Sender: TObject);
begin
with StatusBar1 do begin
Panels[0].Width:=50; // v--- 4*2 = Rand-/Zwischenabstände
Panels[1].Width:=foTest9.Width-50-50-4*2;
end;
end;
kurze Erklärung:
Vorgabe : StatusBar hat 3 Panels; Panel[0] und Panel[2] sollen immer 50 Pixel breit sein
Ergebnis : mittleres Panel[1] ändert die Breite
Gruß Ralph