Feststellen wann bei Windows An- und abgemeldet?

[_frank_]

wenn ich dich richtig verstehe, sollte dir das helfen:

Delphi-Quellcode:

function IsWorkstationLocked: Boolean;
var
  hDesktop: HDESK;
begin
  Result := False;
  hDesktop := OpenDesktop('default',
    0, False,
    DESKTOP_SWITCHDESKTOP);
  if hDesktop <> 0 then
  begin
    Result := not SwitchDesktop(hDesktop);
    CloseDesktop(hDesktop);
  end;
end;

Gruß Frank