Einzelnen Beitrag anzeigen

Delphi Star

Registriert seit: 4. Apr 2004
432 Beiträge
 
Delphi 2005 Personal
 
#1

Ist der Computer gesperrt?

  Alt 29. Nov 2005, 16:34
Mit dieser Funktion kann man überprüfen ob der Computer gesperrt ist.
Delphi-Quellcode:
function IsLocked: boolean;
begin
  Result := false;
  try
    Mouse.CursorPos.X;
  except
    Result := true;
  end;
end;
Die Funktion geht nach der Methode "Try and Error" vor, indem sie auf eine Eigenschaft zugreift, bei deren Zugriff es eine Exception gibt, wenn der Computer gerade gesperrt ist. Allerdings gibt es eine WinAPI-kompatible Lösung, die sich in Beitrag #2 befindet (siehe unten).

[edit=Chakotay1308]Code-Style! Hinweis angefügt. Mfg, Chakotay1308[/edit]
Real programmers code in binary
SwapIt: Punkte
  Mit Zitat antworten Zitat