Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.08.28;
Скачать: CL | DM;

Вниз

Количество запущенных приложений   Найти похожие ветки 

 
granni ©   (2005-08-08 12:18) [0]

Добрый день! Подскажите, как сделать так, чтобы количество одновременно запущенных приложений было не больше одного.


 
Anatoly Podgoretsky ©   (2005-08-08 12:25) [1]

Используй мьютексы, информации по использованию в Сети мегатонны, под любые языки программирования.


 
granni ©   (2005-08-08 12:29) [2]

Спасибо


 
Amoeba ©   (2005-08-08 13:25) [3]

Читаем эту статью:
http://www.delphimaster.ru/articles/limit.html


 
Gydvin ©   (2005-08-08 13:28) [4]

а если так

program Project1;

uses

Forms,
Windows,
Unit1 in "Unit1.pas" {Form1};

{$R *.RES}

var

hwnd: THandle;

begin

hwnd := FindWindow("TForm1", "Form1");
if hwnd = 0 then
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end
else
SetForegroundWindow(hwnd)
end.


 
Anatoly Podgoretsky ©   (2005-08-08 13:30) [5]

Gydvin ©   (08.08.05 13:28) [4]
а если два раз очень быстро щелкнуть по иконке запуска, то как?


 
Gydvin ©   (2005-08-08 13:38) [6]

А вот об этом я недумал, да и код не мой рядом пробегал


 
Gydvin ©   (2005-08-08 13:42) [7]

А если

hwnd: THandle;

begin

..... // в этом месте задержку какую либо поставить?
hwnd := FindWindow("TForm1", "Form1");
if hwnd = 0 then



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

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

Наверх




Память: 0.48 MB
Время: 0.047 c
1-1123510283
Андрей Молчанов
2005-08-08 18:11
2005.08.28
преобразование списка каталогов в древообразный вид


4-1121083542
SpyBoy
2005-07-11 16:05
2005.08.28
combobox


14-1123484215
Ломброзо
2005-08-08 10:56
2005.08.28
Автомобиль как культ


4-1120548568
WG
2005-07-05 11:29
2005.08.28
Как узнать региональные настройки ?


14-1123240459
KilkennyCat
2005-08-05 15:14
2005.08.28
Иллюстрированный самоучитель по Delphi 7 для профессионалов