Текущий архив: 2006.02.19;
Скачать: CL | DM;

Вниз

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

← →
korban ©   (2006-01-30 23:39) [0]

Подскажите как сделать так, что бы можна было открывать программу один раз. Если запустить обратно программу.exe то она не открывалась еще одним окном а просто активировалось окно данной проги?

---

← →
Gero ©   (2006-01-30 23:48) [1]

CreateMutex(nil, False, "Имя твоей программы");
if GetLastError = ERROR_ALREADY_EXISTS then
 // копия программы уже запущена

---

← →
Johnmen ©   (2006-01-31 14:06) [2]

Помимо мютекса можно также использовать евент или семафор.

---

← →
Кефир87 ©   (2006-01-31 14:57) [3]


program Project1;
...
var
 w : HWND;
begin
  w := FindWindow("TForm1", nil);
  if w<>0 then
  begin
    SetForegroundWindow(w);
    Halt;
  end;
 Application.Initialize;
...
end.


---

← →
Desdechado ©   (2006-01-31 16:05) [4]

> запустить обратно
это как?

---

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

Текущий архив: 2006.02.19;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.049 c