Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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


Виталий80 ©   (2005-11-12 17:32:00) 

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

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

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


stef   (2005-11-12 18:48:00) [1]

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


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

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


Oni   (2005-11-12 17:39:00) [3]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо