Форум: "Основная";
Текущий архив: 2002.12.09;
Скачать: [xml.tar.bz2];
Вниз
Help Найти похожие ветки
← →
yuray76 (2002-11-27 15:38) [0]Как предотвратить запуск приложения, если оно уже открыто?
← →
@Ujin (2002-11-27 15:40) [1]//Проверка открыт ли?
Hwnd := FindWindow("TMainForm", nil);
if Hwnd <> 0 then begin
ShowMessage("Уже запущена!");
SetForegroundWindow(Hwnd);
goto lExit;
end;
← →
yuray76 (2002-11-27 16:06) [2]А под какое событие это вешать? Цепляю на Form1.Create - неполучается. Спасибо.
← →
F1 (2002-11-27 16:08) [3]В код проекта - самое подходящее место!
← →
yuray76 (2002-11-27 16:24) [4]может я что то не понимаю, но в даном примере Hwnd всегда будет<>0. тоесть это хендел моего приложения. Или не так?
← →
down (2002-11-27 16:25) [5]Нужно писать в dpr, до создания форм.
← →
F1 (2002-11-27 16:32) [6]>В код проекта - самое подходящее место!
Это который dpr
Меню Project->View Source
причем до строки
Application.CreateForm(TForm1, Form1);
← →
F1 (2002-11-27 16:39) [7]Да, забыл сказать, у тебя выскочит
Undeclared identifier: "FindWindow"
Дык ты не расстраивайся, просто сделай
Uses Windows;
:)))
← →
yuray76 (2002-11-27 16:50) [8]Спасибо, все работает. Просто надо проэкт закривать и запускать экзешник. Ато с делфи приложение видит форму TMainForm и закрывается. Всем спасибо.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.12.09;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.009 c
