рефераты конспекты курсовые дипломные лекции шпоры

Раздел Изобретательство
/
Для часов обязательно понадобится таймер

Реферат Курсовая Конспект

Выберите учебное заведение

Для часов обязательно понадобится таймер

Для часов обязательно понадобится таймер - раздел Изобретательство, Разработка собственных компонентов Ticker: Ttimer; //Картинки Часов И Фона...

Ticker: TTimer;

//Картинки часов и фона
FBitmap, FBGBitmap: TBitmap;

/События
FOnSecond, FOnMinute, FOnHour: TNotifyEvent;

//Центральная точка
CenterPoint: TPoint;

//Радиус
Radius: integer;

//Переменная отвечающая за показ секундной стрелки
ShowSecondArrow: boolean;

//Цвет фона часов
FFaceColor: TColor;

//Цвета стрелок часов
FHourArrowColor,FMinArrowColor, FSecArrowColor: TColor;

//формат даты
FDateFormat: String;

//Стиль шрифта
FFont: TFont;

//Остальные параметры, которые мы рассмотрим в процессе. LapStepW: integer;

PrevTime: TDateTime; CHourDiff, CMinDiff: integer; FClockStyle:TClockStyle;

Теперь в разделе privateопишем процедуру TickerCall. Мы её уже использовали в конструкторе. Она у нас вызывается по событию от таймера, но пока ещё не написали:

Развернуть

Открыть в широком формате

– Конец работы –

Эта тема принадлежит разделу:

Разработка собственных компонентов

Глава Разработка собственных компонентов...

Если Вам нужно дополнительный материал на эту тему, или Вы не нашли то, что искали, рекомендуем воспользоваться поиском по нашей базе работ: Для часов обязательно понадобится таймер

Что будем делать с полученным материалом:

Если этот материал оказался полезным ля Вас, Вы можете сохранить его на свою страничку в социальных сетях:

Все темы данного раздела:

Инициализируем растры TBitmap, в которых будут хранится
//фон и сам рисунок часов. FBGBitmap:= TBitmap.Create; FFont:=TFont.Create;; FBitmap:= TBitmap.Create; FBitmap.Width := Width; FBitmap.Height := Height;

Иначе это уже запущеная программа
//Получить время DecodeCTime( Time, H, M, S); //Получить предыдущее время. DecodeCTime( PrevTime, Hp, Mp, Sp); //Сгенерировать событие OnSeco