Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "WinAPI";
Текущий архив: 2003.08.04;
Скачать: [xml.tar.bz2];

Вниз

Как запретить одновременный запуск нескольких копий окна???   Найти похожие ветки 

 
dimonf   (2003-05-30 19:54) [0]

Я создал диалоговое окно через функцию:
DialogBox(hInstance,"#501",hWnd, @DialogFunc);
Данную функцию я вызываю при нажатии по клавише enter.
1. Как мне запретить повторный запуск копии формы, если у меня еще она не закрыта???
2. Как мне сделать данную форму модальной, если она не закрыта то нельзя не на чего нажать, кроме кнопки выход?
Вообщем грубо говоря надо ее зделать модальной!!!


 
panov   (2003-05-30 21:07) [1]

Для проверку на существование окна можно осуществлять так же, как и для всего приложения. Например:

function isRunning(aUniqueString:String): Bool;
var
hMutex: THandle;
begin
Result := False;
hMutex := CreateMutex(nil,False,PChar(aUniqueString));
if GetLastError = ERROR_ALREADY_EXISTS then
begin
Result := True;
CloseHandle(hMutex);
end;
end;
...
if not isRunning("MyDialogBox") then MyFuncCreateDialogBox;


 
panov   (2003-05-30 21:10) [2]

Вернее, в коде создания окна должен быть вызов...


 
Suntechnic   (2003-05-30 21:12) [3]

2. Как мне сделать данную форму модальной, если она не закрыта то нельзя не на чего нажать, кроме кнопки выход?

А DialogBox по-твоему как окно отображает?

Из хелпа:
DialogBox macro creates a modal dialog box from a dialog box template resource.

В свете ответа на второй вопрос не понятен первый вопрос. Неужели ты это диалог позволяешь вызывать рекурсивно?



Страницы: 1 вся ветка

Форум: "WinAPI";
Текущий архив: 2003.08.04;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.007 c
1-10217
Kair
2003-07-19 09:45
2003.08.04
Кнопка на панели задач


6-10342
AndrewK
2003-05-27 14:45
2003.08.04
Как можно организовать оповещение на другую машину?


1-10261
Endi
2003-07-19 23:29
2003.08.04
процедура WindowProc


1-10183
MVova
2003-07-21 17:39
2003.08.04
Деление на 0


7-10476
Vasiliy
2003-05-24 16:56
2003.08.04
Господа, подскажите как отследить вращение ролика мышки?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский