Delphi-PRAXiS
Seite 2 von 3     12 3      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Komponente zum abrufen des Batteriestatus (https://www.delphipraxis.net/178270-komponente-zum-abrufen-des-batteriestatus.html)

Furtbichler 31. Dez 2013 00:11

AW: Komponente zum abrufen des Batteriestatus
 
Zitat:

Zitat von Dennis07 (Beitrag 1241527)
In dem fall Bedeutet "06" nicht "6", sondern ist die Abkürzung für 2006...

Gut, dann sollte das eigentlich BDS 2006 heißen oder gibt es auch ein Turbo Delphi 2006?

himitsu 31. Dez 2013 00:19

AW: Komponente zum abrufen des Batteriestatus
 
Das erste Turbo Delphi ist eine Edition/Variante von Delphi 2006.

t.roller 20. Apr 2017 12:07

AW: Komponente zum abrufen des Batteriestatus
 
Liste der Anhänge anzeigen (Anzahl: 1)
Zitat:

Zitat von jaenicke (Beitrag 1241443)
Ich habe mal eine kleine Unit dafür geschrieben. Fast nicht getestet,...


Testen sollte man...

Mein Notebook läuft OHNE Netzteil und OHNE Akku.

jaenicke 21. Apr 2017 06:00

AW: Komponente zum abrufen des Batteriestatus
 
Ich habe leider nicht allzu viele Geräte zum Testen zur Verfügung.
Kannst du vielleicht mal einen Screenshot vom Inhalt von FSystemPowerStatus machen bitte?

t.roller 21. Apr 2017 06:55

AW: Komponente zum abrufen des Batteriestatus
 
Liste der Anhänge anzeigen (Anzahl: 1)
Netzteil angeschlossen, Akku wird geladen.
Siehe Anhang:

Ghostwalker 21. Apr 2017 08:37

AW: Komponente zum abrufen des Batteriestatus
 
Jup...bei mir das gleiche +
Fehler "Ungültiges Argument beim codieren der Uhrzeit" oder sowas....

Fehler gefunden:

Code:
var
  LifeTimeSeconds: [COLOR="Red"]Integer;[/COLOR]
begin
  if Refresh then
  begin
    LifeTimeSeconds := FSystemPowerStatus.BatteryFullLifeTime;
    if LifeTimeSeconds = $FFFFFFFF then
LifeTimeSeconds ist bei mir -1 und das scheint wohl doch nicht $FFFFFFFF zu sein

System Win10 Prof
Comp 10.2 Tokyo Starter


:)

jaenicke 21. Apr 2017 08:57

AW: Komponente zum abrufen des Batteriestatus
 
Liste der Anhänge anzeigen (Anzahl: 1)
Da habe ich damals ein paar Fehler gemacht... :oops:

Korrektur siehe Anhang...
Anhang 47171

t.roller 21. Apr 2017 10:51

AW: Komponente zum abrufen des Batteriestatus
 
Liste der Anhänge anzeigen (Anzahl: 1)
Immer noch fehlerhaft. Akku ist voll geladen und hat 100%.

Nachtrag:
Du hast falsche Werte "eingeschmuggelt":
Delphi-Quellcode:
class function TPowerStatusInfo.Refresh: Boolean;
begin
  if FUpdateCounter <= 0 then
    FSuccess := GetSystemPowerStatus(FSystemPowerStatus);
  FSystemPowerStatus.ACLineStatus := 1;
  FSystemPowerStatus.BatteryFlag := 9;
  FSystemPowerStatus.BatteryFullLifeTime := 4294967295;
  FSystemPowerStatus.BatteryLifePercent := 79;
  FSystemPowerStatus.BatteryLifeTime := 4294967295;
  Result := FSuccess;
end;

jaenicke 21. Apr 2017 11:01

AW: Komponente zum abrufen des Batteriestatus
 
Argh, danke, ich habe den Anhang korrigiert... :?

Ghostwalker 23. Apr 2017 01:29

AW: Komponente zum abrufen des Batteriestatus
 
Kleine zusätzliche Info:

Die Anzeige "Kein Akku vorhanden" ist sogar korrekt und bezieht sich auf den 1. Akku. 2. Akku wird (zumindest von der Standard-Windows Anzeige) als vorhanden gemeldet mit XX %.

Scheint so, als ob die Auflistung der Flags in der MSDN wohl ein wenig.....wenig ist :)


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:00 Uhr.
Seite 2 von 3     12 3      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz