Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Мультимедиа в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 05.04.2009, 17:13   #1
Dj_DeVaIs
Пользователь
 
Регистрация: 07.03.2009
Сообщений: 52
По умолчанию создание часов

Привет все...
помогите пожалуйста....
вот задание: секундная стрелка часов совершает полный оборот....кнопка запускает это все...
подскажите как можно это сделать...а лучше примерный код напешите....
Dj_DeVaIs вне форума Ответить с цитированием
Старый 05.04.2009, 17:48   #2
program123
Подтвердите свой е-майл
 
Регистрация: 12.02.2009
Сообщений: 144
По умолчанию

http://programmersclub.ru/labtimer/
program123 вне форума Ответить с цитированием
Старый 05.04.2009, 23:55   #3
Олвин
Экспериментатор
Форумчанин
 
Аватар для Олвин
 
Регистрация: 16.04.2008
Сообщений: 218
По умолчанию

Для простоты. Можешь создать процедуру с параметром - углом, рисующую стрелку часов, повёрнутую на этот угол? Можешь на событии таймера прибавлять к переменной-счётчику единицу и вызывать эту процедуру с этой переменной в качестве параметра? Всё.
Только когда переменная будет достигать максимального значения (360 maybe?) надо будет её обнулять:
Код:
if i >= 360 then i := 0;
Для создания сложных вещей не нужны сложные интерфейсы. (с) Линус Торвальдс
Олвин вне форума Ответить с цитированием
Старый 06.04.2009, 00:22   #4
Dj_DeVaIs
Пользователь
 
Регистрация: 07.03.2009
Сообщений: 52
По умолчанию

спасибо огромное...очень помогли...
Dj_DeVaIs вне форума Ответить с цитированием
Старый 06.04.2009, 18:31   #5
Levsha100
Заблокирован
Старожил
 
Регистрация: 20.07.2008
Сообщений: 4,032
Радость

Цитата:
Сообщение от Олвин Посмотреть сообщение
Код:
if i >= 360 then i := 0;
Поправлю:
Код:
if i >= 360 then i := i-360;
[/QUOTE]
Levsha100 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Контрольная по Delphi. Срок 18 часов, оплата WM. PUH Фриланс 2 08.12.2008 17:46
Иконка у часов Lonix Безопасность, Шифрование 4 03.04.2007 22:49
КАК поделить цыферблат часов на 10 равных частей? VALIK Общие вопросы Delphi 4 28.02.2007 19:51