Определение сессии Windows.

← →
Митяй2 (2003-10-24 10:44) [0]

Здравствуйте, подскажите, пожалуйста.

Запускаем 1-ый раз программу.
Она ЧТО-ТО делает в ТЕКУЩЕЙ сессий windows.
После своей работы она сохраняет данные.
Выходим из программы.

Через некоторое время запускаем 2-ой раз программу.
Как определить запущенна программа в той же сессии windows,
или была произведена перезагрузка компьютера и сессия Windows
уже новая.
Это нужно, т.к. это влияет на алгоритм работы программы.

← →
ZEE © (2003-10-24 11:00) [1]

вот нашел когда-то в сети
//Данный пример запускается только один раз за сессию Windows. procedure TForm1.FormCreate(Sender: TObject); begin if GlobalFindAtom("THIS_IS_SOME_OBSCUREE_TEXT") = 0 then GlobalAddAtom("THIS_IS_SOME_OBSCUREE_TEXT") else begin ShowMessage("This version may only be run "+ "once for every Windows Session."+#13+ "To run this program again, you "+ "need to restart Windows, or better yet:"+#13+ "REGISTER !!"); Halt; end;

Определение сессии Windows. Найти похожие ветки