Текущий архив: 2003.04.14;
Скачать: CL | DM;
Вниз
Немодальный ShowMessage() Найти похожие ветки
← →
EthernalWonderer (2003-04-03 13:04) [0]Господа! Можно ли использовать ShowMessage или какой - нибудь другой стандартный диалог для выдачи сообщения, не останавливая работу программы (т.е. немодально)? Создание специального диалогового окна прошу не предлагать.
← →
Roma (2003-04-03 13:06) [1]MessageBox( 0, ...
← →
ggsoft (2003-04-03 13:26) [2]Можно, в отдельном потоке (TThread): MessageBox(...) - будет немодально...
← →
Pat (2003-04-03 13:34) [3]>Создание специального диалогового окна прошу не предлагать
А ты думаешь как это Делфи делает-то? Если немного полазить по исходникам, можно найти примерно это:
with CreateMessageDialog(Msg, DlgType, Buttons) do
try
HelpContext := HelpCtx;
HelpFile := HelpFileName;
if X >= 0 then Left := X;
if Y >= 0 then Top := Y;
if (Y < 0) and (X < 0) then Position := poScreenCenter;
Result := ShowModal;//Сделай не модальным и можно FormmStyle=fsStayOnTop
finally
Free;
end;
← →
ggsoft (2003-04-03 13:35) [4]Sorry, хренотень какую-то написал...
← →
EthernalWonderer (2003-04-03 15:13) [5]ggSoft, Roma: проверял Ваши варианты, всё равно диалог выскакивает модально.
Pat: да, так получается. Есть, правда, нюанс: кнопочки не работают на таком диалоге. Слава Богу, системная кнопка Close присутствует.
Большое спасибо за советы!
Страницы: 1 вся ветка
Текущий архив: 2003.04.14;
Скачать: CL | DM;
Память: 0.45 MB
Время: 0.008 c
