Info na pasku stanu

Mam pytanko jakzrobic zeby na pasku stanu (programu) bylo cos so sie zmienia tzn. normalnie w opcjach kompilowania wpisujemy w Title: Costam i to jest wyswietlane a mi chodzi np zeby podawolo procentowy stan zciagania pliku, czyli bylo zmmienie a nie stale.

wie ktos moze jak przypisac do Aplication.Title wlasnie cos takiego ??

pozdrawiam

procedure TForm1.Timer1Timer(Sender: TObject);
begin
Application.Title := IntToStr(i mod 100)+'%';
Inc(i);
end;

To oczywiście jest bezużyteczne, ale jak masz jakąś funkcję w swoim programie wyznaczającą postęp to możesz analogicznie zrobić.

Nie wiem czy dobrze zrozumiałem :-) , ale czy nie lepiej przypisać tekst paskowi stanu za pomocą właściwości SimpleText? [cygaro]

1. Właściwość SimplePanel dla paska ustaw na True.
2. Przypisuj tekst właściwości SimpleText tak jak piszesz Label1.Caption := 'Costam';

I teraz np. napisz pętelkę, która np. co 1 sekundę zmienia tekst.

OKI DOKI :) dzieki za pomoc mam juz to co chcialem :D
dziala jak tralal [hurra]