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

Вниз

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

 
irishka001 ©   (2005-11-23 10:00) [0]

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


 
Reindeer Moss Eater ©   (2005-11-23 10:00) [1]

Удалить её


 
Джо ©   (2005-11-23 10:04) [2]


>  [1] Reindeer Moss Eater ©   (23.11.05 10:00)
> Удалить её

Не, тогда и первого запуска не произведешь :))


 
Джо ©   (2005-11-23 10:07) [3]


> irishka001 ©   (23.11.05 10:00)
> Подскажите, как можно заблокировать повторный запуск программы.

См. статью Ю.Зотова:
http://delphikingdom.ru/asp/viewitem.asp?catalogid=903
(если я правильно понял вопрос)


 
Reindeer Moss Eater ©   (2005-11-23 10:09) [4]

Там недопущение повторного запуска делается во время этого самого повторного запуска. Уже случившегося.


 
Alex_KV   (2005-11-23 10:14) [5]

Используй mutex.
...
var
 SysOneCopyMutex: THandle = 0;
...
При запуске программы:
 SysOneCopyMutex := CreateMutex(nil, false, AMutexName);
где AMutexName - имя мьютекса, например "MyMutex"


 
Джо ©   (2005-11-23 10:18) [6]


>  [4] Reindeer Moss Eater ©   (23.11.05 10:09)

Да ладно, не зря ж вопрос в "Начинающих".


 
Reindeer Moss Eater ©   (2005-11-23 10:19) [7]

Ну и мой ответ для них же.


 
Alex_KV   (2005-11-23 10:21) [8]

Да, и самое главное после создания проверить
le := GetLastError;
Result := (SysOneCopyMutex <> 0) and (le <> ERROR_ALREADY_EXISTS);

А при завершении программы
if (SysOneCopyMutex <> 0) then CloseHandle(SysOneCopyMutex);


 
Reindeer Moss Eater ©   (2005-11-23 10:22) [9]

Девушка, увлекающаяся психологией, а какой смысл вы вкладываете в понятие "повторный запуск программы"?


 
Reindeer Moss Eater ©   (2005-11-23 10:24) [10]

Alex_KV  

Я запустил программу первый раз в понедельник.
Во вторник комьютер не работал.
Второй раз я её собираюсь запустить в субботу.
Где к тому времени будет твой мьютекс?


 
irishka001 ©   (2005-11-28 17:01) [11]


> Alex_KV  

Спасибо. Все получилось. Еще, если кому понадобится, есть неплохая статья: http://subscribe.ru/archive/comp.soft.prog.delphi4all/200203/18182252.html


 
Alexandr Bydantcev ©   (2005-11-28 22:45) [12]

2 Reindeer Moss Eater
Понятие повторного запуска - это отсутствие экземпляра программы в данный момент в памяти. :)  Мне кажется, что это легко и понятно. А фраза про запуск проги понедельник-суббота - непрофессионально.



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

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

Наверх





Память: 0.47 MB
Время: 0.011 c
2-1133348698
LG
2005-11-30 14:04
2005.12.18
Итерфейс в стиле Office


3-1130924059
Id
2005-11-02 12:34
2005.12.18
Получение пароля


2-1133213003
Fl@sh
2005-11-29 00:23
2005.12.18
Связь между двумя таблицами программно, как??


2-1132726445
AndreyAR
2005-11-23 09:14
2005.12.18
Не виден сервер


2-1133326401
BanderLog
2005-11-30 07:53
2005.12.18
Проблемы с VK_BACK





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский