Поиск:

Ответ в темуСоздание новой темы Создание опроса
> как сделать ход времени, как в часах Windows 
:(
    Опции темы
susanin
Дата 23.4.2007, 15:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 587
Регистрация: 7.10.2006
Где: Санкт-Петербург

Репутация: нет
Всего: 7
сделал что на форме отображается реальное время на момент запуска программы.... теперь хотелось бы еще сделать, чтобы это время еще и шло....т.е. как в стандартынх часах шли секунды минуты и часы... как это можно реализовать?
само отображение времени сделал так
Код

void __fastcall TForm1::FormPaint(TObject *Sender)
{
TDateTime t;
AnsiString mes;
Canvas->Brush->Style = bsClear;
   mes = "Текущее время:" + t.TimeString();
                Canvas->TextOutA(32,250,mes);
}
PM MAIL   Вверх
SenkraD
Дата 23.4.2007, 15:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 933
Регистрация: 3.2.2006
Где: Украина::Киев

Репутация: 9
Всего: 23
А положить TLabel и цикле написать что-то такое
Код

Label1->Caption = FormatDateTime("hh:nn:ss", dtNow);



--------------------
 Имеющий язык - да не убоится спросить! 
user posted image
PM MAIL ICQ   Вверх
susanin
Дата 23.4.2007, 15:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 587
Регистрация: 7.10.2006
Где: Санкт-Петербург

Репутация: нет
Всего: 7
Цитата(SenkraD @  23.4.2007,  15:40 Найти цитируемый пост)
А положить TLabel и цикле написать что-то такое

так все равно отображается только время, которое было в мемент запуска программы.....а секунды и минуты считаться не хотят....
PM MAIL   Вверх
SenkraD
Дата 23.4.2007, 15:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 933
Регистрация: 3.2.2006
Где: Украина::Киев

Репутация: 9
Всего: 23
Забыл, сори
Положи ещё таймер с интервалом 1000мс и в обработчике OnTimer напиши
Код

Label1->Caption = FormatDateTime("hh:nn:ss", Now());



--------------------
 Имеющий язык - да не убоится спросить! 
user posted image
PM MAIL ICQ   Вверх
susanin
Дата 23.4.2007, 16:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 587
Регистрация: 7.10.2006
Где: Санкт-Петербург

Репутация: нет
Всего: 7
SenkraD , спасибо! теперь все как надо!
PM MAIL   Вверх
CrasyMen
Дата 23.4.2007, 23:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 264
Регистрация: 19.12.2006

Репутация: нет
Всего: 3
susanin, можеш выложить то что у тебя получилось. Мне тоже это надо. Как раз хотел тему создавать  smile 


--------------------
Человек просто обязан ошибаться, раз другие учатся на его ошибках.
[color=skyblue]Хочу сменить ник и сменю как только дадут такую возможность.[/color]
PM MAIL ICQ   Вверх
susanin
Дата 24.4.2007, 10:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 587
Регистрация: 7.10.2006
Где: Санкт-Петербург

Репутация: нет
Всего: 7
CrasyMen , могу  
Код

void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
    Label2->Caption= FormatDateTime("hh:nn:ss", Now());

}
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "С++ Builder"
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по С++ Builder обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Настоятельно рекомендуем заглянуть в DRKB (Delphi Russian Knowledge Base) - крупнейший в рунете сборник материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | C++ Builder | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0500 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.