nesco писал(а):
Как определить "кто" вошел -- старый пользователь или новый?А что ComputerInfo не сработает (лень мне юзера заводить и эксперементировать)
Да и флаг регистрации как бы NOTIFY_FOR_THIS_SESSION а не NOTIFY_FOR_ALL_SESSIONS
Так, выше пример был для приложений с формами, лудше конечно сделать универсальным и переписать процедуру Init так
procedure THiAsmClass.Init;
begin
fOldMsg := Applet.OnMessage;
Applet.OnMessage := onMessage;
WTSRegisterSessionNotification(Applet.Handle,NOTIFY_FOR_THIS_SESSION);
end;
Проверил, вроде работает