Скачать: CL | DM;

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

← →
Виталий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]

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

---

← →
stef ©   (2005-11-12 18:48) [3]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.058 c