![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Пользователь
Регистрация: 07.11.2012
Сообщений: 84
|
![]()
Доброе утро)
Легкий вопрос, но никак не сделаю) Форма авторизации, заходим, и хочу чтобы на фоне развернувшейся Мэин Форм выскочило сообщение: if myCount > 0 then ShowMessage('у вас непрочитанные документы!'); Засунула в OnShow, но тогда сначала выскакивает сообщение, и по нажатию на Ок -MainForm. Не так в общем) Как сделать на фоне MainForm? |
![]() |
![]() |
![]() |
#2 |
Старожил
Регистрация: 17.11.2010
Сообщений: 18,922
|
![]()
OnActivate
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
|
![]() |
![]() |
![]() |
#3 |
Сисадмин
Форумчанин
Регистрация: 28.12.2007
Сообщений: 320
|
![]()
"Засуньте" в OnActivate
UPD: Опоздал ![]() |
![]() |
![]() |
![]() |
#4 |
Пользователь
Регистрация: 07.11.2012
Сообщений: 84
|
![]()
Ок, да, на фоне МэинФорм открылось, потом я открываю Форм3, закрываю Форм3, на фоне МэинФорм снова это сообщение : ) пробовала так)
но надо только один раз при входе |
![]() |
![]() |
![]() |
#5 |
Сисадмин
Форумчанин
Регистрация: 28.12.2007
Сообщений: 320
|
![]()
Сделайте логическую переменную, в OnCreate значение, например, true (сообщение не показывалось), в OnActivate условие
Код:
|
![]() |
![]() |
![]() |
#6 |
Пользователь
Регистрация: 07.11.2012
Сообщений: 84
|
![]()
Гениально! спасибо!
![]() |
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Showmessage | Pein95 | Общие вопросы Delphi | 6 | 05.03.2011 21:44 |
ShowMessage | krikaved | Общие вопросы Delphi | 6 | 19.03.2010 04:19 |
showmessage | Neymexa | Помощь студентам | 2 | 24.01.2009 18:00 |
ShowMessage | DM_bite | Помощь студентам | 14 | 12.09.2008 01:02 |
Как в Showmessage | Михаил Юрьевич | Общие вопросы Delphi | 2 | 03.07.2008 06:00 |