|
Registriert seit: 19. Mär 2003
Ort: Wuppertal
835 Beiträge
Delphi 3 Standard
|
Re: Statusbar: dynamische Größe
1. Aug 2003, 18:37
Hallo daywalker299,
meinst Du das ???
Delphi-Quellcode:
procedure TForm1.StatusBarResize(Sender: TObject);
var
I: Integer;
PanelsSize: Integer;
begin
PanelsSize := 0;
for I := 1 to StatusBar.Panels.Count - 1 do
PanelsSize := PanelsSize + StatusBar.Panels[I].Width;
StatusBar.Panels[0].Width := Width - PanelsSize;
end;
bye
Künftige Generationen wollen ihre Fehler selber machen.
Jedes Programm wird nie das können, was Du wirklich brauchst.
Das Gegenteil von gut ist gut gemeint
-----
|