LEADERSOFT.ru Разработка на заказ программ и сайтов
Форумы по информационным технологиям
 
Регистрация  |  Вход
left
 Forums Обновлено :: 07 февраля 2005
Форумы Минимизировать
ПоискСписок форумов
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: Мигающая ...
 Тема: Мигающая форма
 
 15.06.2007 21:03:26
Andrew2
11 сообщения


Тема: Мигающая форма
Вычитал в "Visual Basic 6.0" Джон Кларк Крейг & Джефф Уебб стр.210 %) "Заставить форму мигать, чтобы привлечь внимание пользователя"
Как это реализовать в Accesse? Мож кто знает?


P.S. События в формах
Автор: Andrew от 23.11.2002 16:54:58 Источник ...
 15.06.2007 21:03:26
RV
38 сообщения


RE: Мигающая форма
Функция FlashWindow
Declare Function FlashWindow Lib "user32.dll" (ByVal hwnd As Long, ByVal bInvert As Long) As Long


Private Sub Command1_Click()
' Окно мигает 5 раз для привлечения внимания
Dim c As Integer, retval As Long
For c = 1 To 10 ' 5 раз цвет активного окна и 5 раз-неактивного
retval = FlashWindow(Form1.hwnd, 1) ' переключаем вид окна
Sleep 500 ' пауза через каждые 500 миллисекуд (1/2 секунды)
Next c
retval = FlashWindow(Form1.hwnd, 0) ' окно должно выглядить активным
End Sub

ЛУЧШЕ повесь на ТАЙМЕР!!!


P.S. События в формах
Автор: RVGroup от 25.11.2002 12:23:18 Источник ...
 15.06.2007 21:03:26
Andrew2
11 сообщения


RE: Мигающая форма
Эх... а я думал это внизу форма мигает , а это так... Если Access свёрнут полностью с формми, то никакого мигания нет . Вот это было бы действительно интересно %)


P.S. События в формах
Автор: Andrew от 26.11.2002 1:43:21 Источник ...
 Страница 1 из 1
СледующийПредыдущийНет оценки
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: Мигающая ...
ПоискПоиск  Список форумовСписок форумов  
right
Начало | Forums
Copyright 2002-2016 Leadersoft.ru   ::  Leadersoft  ::  Соглашение о безопасности  ::  Условия использования
Не забудьте сохранить ссылку на страницу с кодом для дальнейшего анализа
Сайт разработан на базе технологий ASP.NET, DotNetnuke