| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Определение сессии Windows. [D7, Win95/98, WinME, Win2k, WinXP]

Митяй2 ©   (2003-10-24 10:44:00) 

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

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

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

---

ZEE   (2003-10-24 11:00: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;

---

Наверх