Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.014 c
1-44103
denis24
2003-04-02 19:07
2003.04.14
while not eof(1) do....


14-44354
Феликс
2003-03-31 02:24
2003.04.14
Проект в котором слушают космос


1-44106
Sergeus
2003-04-02 21:17
2003.04.14
Corel


14-44380
Феликс
2003-03-26 15:54
2003.04.14
Протеин, чтобы типа мыщцы росли...:)


3-44024
Jaxtor
2003-03-25 16:07
2003.04.14
Procedure Unknown




   Наверх