Как сделать чтобы цифры часов менялись в реальном времени

← →
Виталий80 (2005-11-12 17:32) [0]

Добрый вечер господа!

Подскажите как получить в стутус баре текущее время чтобы цифры часов менялись в реальном времени

procedure TForm1.FormCreate(Sender: TObject);
begin
StatusBar1.Panels[0].Text:="Текущее время: "+TimeToStr(Time);
end;

← →
Oni (2005-11-12 17:39) [1]

TTimer использовать не пробовал?

← →
Виталий80 (2005-11-12 18:43) [2]

А как правильно использовать

По событию OnTimer пишем так:
StatusBar1.Panels[0].Text:="Текущее время: "+TimeToStr(Time);
И все работает.
Только не забудь компонент TTimer поместить на форму.

Как сделать чтобы цифры часов менялись в реальном времени Найти похожие ветки