Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Showmessage прячется [D7, WinXP]


Rat ©   (2004-12-09 05:11:00) 

Допустим, выполняется долгая операция(напр хранимая процедура на SQL2000).
По окончанию Delphi должна выдать showmessage, что, типа, все закончено. Но часто бывает, что этот message "прячется" за форму,( и не поймешь, то ли все закончилось, то ли еще нет; приходится двигать форму, жать на Alt-Tab и все в таком духе)
Как сделать, чтоб не пряталась???
P.S.По-моему такое в осн происходит, когда во время выполнения этой операции юзер переключается на другие программы, а потом снова выбирает эту прогу.


Erik1   (2004-12-09 13:15:00) [1]

Использовать API функции
 Flags := Buttons + MsgIcon+ mb_TaskModal + ((DefaultButton and 7) shl 8);
 Result := MessageBoxLng(Parent, MsgTitle, MsgText, Flags);

 case Result of
   IDYES: Result := mrYes;
   IDNO:  Result := mrNo;
   IDOK:  Result := mrOk;
   IDCANCEL: Result := mrCancel;
   IDAbort:  Result := mrAbort;
   IDIGNORE: Result := mrIgnore;
   IDRETRY:  Result := mrRetry;
 end;


VMcL   (2004-12-09 12:30:00) [2]

>> Rat  (09.12.04 05:11)

SetForegroundWindow(), SystemParametersInfo(SPI_GETFOREGROUNDLOCKTIMEOUT, ...)
?


ShotGuN   (2004-12-09 11:09:00) [3]

formStyle = fsMDIForm ???


Игорь Шевченко   (2004-12-09 10:33:00) [4]

MessageBox ?


Наверх

Титульная страница Поиск, карта сайта Написать письмо