Einzelnen Beitrag anzeigen

Flips

Registriert seit: 17. Feb 2005
Ort: Sankt Wendel
491 Beiträge
 
Delphi 7 Professional
 
#6

Re: Laptop Stromalarm

  Alt 12. Okt 2008, 16:27
Zitat von hamburcher:
Zitat von Flips:
Kannste dir doch selbst schnell schreiben, du kannst mit Delphi prüfen, ob das Notebook per Akku oder Netzstecker läuft.
Mach nen Timer, der das alle X Sekunden prüft und fertig.
Noch einfacher als Programmieren ist Herumschwafeln
Bitteschön:
Delphi-Quellcode:
function UsesBattery:boolean;
var SystemPowerStatus: TSystemPowerStatus;
begin
  GetSystemPowerStatus(SystemPowerStatus);
  result := (SystemPowerStatus.ACLineStatus = 0);
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
if UsesBattery then
  Beep;
end;
Ungetestet, hab keinen Laptop (aufem PC gibts aber kein Beep, daher sollte es funktionieren)
Philipp F.
  Mit Zitat antworten Zitat