Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

программа на данном компьютере больше не запускалась

Страницы: < 1 2
Galiley © (2007-07-27 09:43:00)
Как сделать, чтобы программа на данном компьютере больше не запускалась?
Пр.: после нажатия на кнопку.

Сергей М. (2007-07-27 10:34:00) [21]

> Galiley (27.07.07 10:27) [12]

Этот код не имеет ничего общего с твоим вопросом.
Программа как запускалась, так и продолжает запускаться.

iXT (2007-07-27 10:33:00) [22]
Уверен, что я не смогу запустить такую прогу без перезагрузки дважды?

Человек (2007-07-27 10:30:00) [23]

> XT © (27.07.07 10:21) [11]
> > [10] Человек (27.07.07 10:20)Но запуститься - читать
> [8]

но ведь вырубится

Galiley (2007-07-27 10:27:00) [24]
Вот нашёл тот код:
После добавления следующего кода в программу, она запустится только один раз за время сессии Windows. Для повторного запуска программы необходимо будет перезагрузить Windows. procedure TForm1.FormShow(Sender : TObject); var atom : integer; CRLF : string; begin if GlobalFindAtom('THIS_IS_SOME_OBSCUREE_TEXT') = 0 then atom := GlobalAddAtom('THIS_IS_SOME_OBSCUREE_TEXT') else begin CRLF := #10 + #13; ShowMessage('This programm will start only once' + CRLF + for next start reboot windows please, or...' + CRLF + 'REGISTER PROGRAM !!'); Close; end; end;

Вот как не на сеанс, а навсегда?

iXT (2007-07-27 10:21:00) [25]
> [10] Человек (27.07.07 10:20)

Но запуститься - читать [8]

Человек (2007-07-27 10:20:00) [26]
И сразу вырубится

iXT (2007-07-27 10:19:00) [27]
> [7] Человек (27.07.07 10:17)

Прога запуститься.

iXT (2007-07-27 10:18:00) [28]
> [6] Сергей М. © (27.07.07 10:16)

Как всегда формулировка хромает :)

Человек (2007-07-27 10:17:00) [29]
А с помощью INI даже после переустановки прога не запустится

Сергей М. (2007-07-27 10:16:00) [30]

> можно заново его закатать

Ну если так, то тогда никак)

iXT (2007-07-27 10:13:00) [31]
> [4] Сергей М. © (27.07.07 10:11)

Дык можно заново его закатать :)

Сергей М. (2007-07-27 10:11:00) [32]
Единственный способ - уничтожить или испортить исп.файл приложения.

Человек (2007-07-27 10:08:00) [33]
знаю, что ерунда. НО после перезагрузки прога то не запустится :))

Galiley (2007-07-27 09:58:00) [34]
это ерунда!

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

Человек (2007-07-27 09:50:00) [35]
При нажатии на кнопку:
Ini.WriteInteger('yourprogram','close',1);

При formcreate
close:=Ini.readinteger('yourprogram','close',1);
if close=1 then
close;

Страницы: < 1 2

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »