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

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

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

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

Ответ
 
Опции темы Поиск в этой теме
Старый 27.06.2008, 18:40   #1
Fantom
Пользователь
 
Аватар для Fantom
 
Регистрация: 10.05.2008
Сообщений: 41
По умолчанию Мигание двоеточия

Как обеспечить мигание двоеточия?
Fantom вне форума Ответить с цитированием
Старый 27.06.2008, 18:50   #2
Карась
Участник клуба
 
Аватар для Карась
 
Регистрация: 26.10.2007
Сообщений: 1,244
По умолчанию

Варианты различны и их много, в зависимости от того где оно должно мигать.
Умом Россию не понять, пока не выпито ноль пять,
А если выпито ноль пять всё делом кажется не хитрым,
Попытка глубже понимать уже попахивает литром...
Карась вне форума Ответить с цитированием
Старый 27.06.2008, 22:05   #3
mutabor
Телепат с дипломом
Старожил
 
Аватар для mutabor
 
Регистрация: 10.06.2007
Сообщений: 4,929
По умолчанию

The future is not a tablet with a 9" screen no more than the future was a 9" black & white screen in a box. It’s the paradigm that survives. (Kroc Camen)
Проверь себя! Онлайн тестирование | Мой блог
mutabor вне форума Ответить с цитированием
Старый 27.06.2008, 22:45   #4
Fantom
Пользователь
 
Аватар для Fantom
 
Регистрация: 10.05.2008
Сообщений: 41
По умолчанию

На компоненте Label
Fantom вне форума Ответить с цитированием
Старый 27.06.2008, 22:56   #5
Квэнди
Старожил
 
Аватар для Квэнди
 
Регистрация: 13.12.2006
Сообщений: 3,859
По умолчанию

с помощью компонента timer
ICQ не для вопросов, а для предложений. Для вопросов используйте форум
IRC канал клуба программистов|Мои статьи
Квэнди вне форума Ответить с цитированием
Старый 27.06.2008, 22:59   #6
mutabor
Телепат с дипломом
Старожил
 
Аватар для mutabor
 
Регистрация: 10.06.2007
Сообщений: 4,929
По умолчанию

Код:
const
text1 = '23';
text2 = '59';
mig: array[0..1] of string = ('  ', ' : ');

var
c: byte;

//в таймере (интервал нужный установишь)
if c = 0 then c:=1 else c:=0;
Label1.Caption:=text1+mig[c]+text2;
The future is not a tablet with a 9" screen no more than the future was a 9" black & white screen in a box. It’s the paradigm that survives. (Kroc Camen)
Проверь себя! Онлайн тестирование | Мой блог
mutabor вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Мигание при движении Speeker Общие вопросы Delphi 1 14.02.2007 01:22