|
|
|
Мигающий текст - как ?
|
|||
|---|---|---|---|
|
#18+
Кто знает как заставить мигать текст (Label) на форме ? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.10.2007, 08:52 |
|
||
|
Мигающий текст - как ?
|
|||
|---|---|---|---|
|
#18+
Помести на форму таймер и по его событию мигай текстом. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.10.2007, 09:16 |
|
||
|
Мигающий текст - как ?
|
|||
|---|---|---|---|
|
#18+
А если без таймера... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.10.2007, 09:34 |
|
||
|
Мигающий текст - как ?
|
|||
|---|---|---|---|
|
#18+
"Вам шашечки или ехать?" (с) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.10.2007, 09:48 |
|
||
|
Мигающий текст - как ?
|
|||
|---|---|---|---|
|
#18+
И то и другое, желательно без хлеба ! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.10.2007, 09:57 |
|
||
|
Мигающий текст - как ?
|
|||
|---|---|---|---|
|
#18+
ALEXPFRА если без таймера... Никак. Или уж ставить на форму OLE-объект "Анимация какая-нибудь". Но это извращение. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.10.2007, 12:01 |
|
||
|
Мигающий текст - как ?
|
|||
|---|---|---|---|
|
#18+
Ну зачем так глобально - достаточно анимационого gif-а ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.10.2007, 12:07 |
|
||
|
Мигающий текст - как ?
|
|||
|---|---|---|---|
|
#18+
для извращения на скорую руку придумал только вот это.... а так либо таймер, либо анимация,.... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.10.2007, 12:17 |
|
||
|
Мигающий текст - как ?
|
|||
|---|---|---|---|
|
#18+
Использую в Timer1.Timer следующий код IF MOD(SECONDS(),2)=0 THISFORM.TEXT7.ForeColor=RGB(255,0,0) THISFORM.Refresh ELSE THISFORM.TEXT7.FORECOLOR=RGB(0,255,0) THISFORM.Refresh ENDIFE и ничего не происходит - только один цвет. Запарился уже - не понимаю где ошибка. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.10.2007, 12:19 |
|
||
|
Мигающий текст - как ?
|
|||
|---|---|---|---|
|
#18+
нарисуйте анимированный гиф и положите на форму ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.10.2007, 12:52 |
|
||
|
Мигающий текст - как ?
|
|||
|---|---|---|---|
|
#18+
ALEXPFRИспользую в Timer1.Timer следующий код IF MOD(SECONDS(),2)=0 THISFORM.TEXT7.ForeColor=RGB(255,0,0) THISFORM.Refresh ELSE THISFORM.TEXT7.FORECOLOR=RGB(0,255,0) THISFORM.Refresh ENDIFE и ничего не происходит - только один цвет. Запарился уже - не понимаю где ошибка. Код: plaintext 1. 2. 3. 4. 5. 6. 7. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.10.2007, 13:47 |
|
||
|
Мигающий текст - как ?
|
|||
|---|---|---|---|
|
#18+
Выставь свойство таймера: Interval=1000 (частота в миллисекундах). Убедись, что свойство Enabled=.T. (по умолчанию). Используй любую переменную/свойство (например, как в предыдущем примере) в качестве переключателя. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.10.2007, 14:09 |
|
||
|
|

start [/forum/topic.php?fid=41&fpage=181&tid=1588632]: |
0ms |
get settings: |
8ms |
get forum list: |
20ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
22ms |
get topic data: |
12ms |
get forum data: |
3ms |
get page messages: |
58ms |
get tp. blocked users: |
1ms |
| others: | 192ms |
| total: | 322ms |

| 0 / 0 |
