AGB  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Win32/Win64 API (native code) Delphi Komponente zum abrufen des Batteriestatus

Komponente zum abrufen des Batteriestatus

Ein Thema von Dennis07 · begonnen am 29. Dez 2013 · letzter Beitrag vom 23. Apr 2017
Antwort Antwort
Seite 2 von 3     12 3   
Foren-Tage 2017
DIE Konferenz für Delphi-Entwickler mit vielen Vorträgen und ganztägigen Workshops, veranstaltet u.A. von der Delphi-PRAXiS und Embarcadero.
21.-23. September 2017 in Hamburg · Mehr Infos unter forentage.de.
Furtbichler
(Gast)

n/a Beiträge
 
#11

AW: Komponente zum abrufen des Batteriestatus

  Alt 31. Dez 2013, 00:11
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?
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
32.951 Beiträge
 
Delphi XE3 Professional
 
#12

AW: Komponente zum abrufen des Batteriestatus

  Alt 31. Dez 2013, 00:19
Das erste Turbo Delphi ist eine Edition/Variante von Delphi 2006.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
Delphi-Tage 2005-2014

Geändert von himitsu (31. Dez 2013 um 00:26 Uhr)
  Mit Zitat antworten Zitat
t.roller

Registriert seit: 28. Mär 2016
255 Beiträge
 
#13

AW: Komponente zum abrufen des Batteriestatus

  Alt 20. Apr 2017, 12:07
Ich habe mal eine kleine Unit dafür geschrieben. Fast nicht getestet,...

Testen sollte man...

Mein Notebook läuft OHNE Netzteil und OHNE Akku.
Miniaturansicht angehängter Grafiken
notebook_keinnt-keinakku.jpg  
E = mc² is Energy = milk * coffee²
  Mit Zitat antworten Zitat
Benutzerbild von jaenicke
jaenicke
Online

Registriert seit: 10. Jun 2003
Ort: Berlin
6.324 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#14

AW: Komponente zum abrufen des Batteriestatus

  Alt 21. Apr 2017, 06:00
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?
Sebastian Jänicke
Alle eigenen Projekte sind eingestellt, ebenso meine Homepage, Downloadlinks usw. im Forum bleiben aktiv!
  Mit Zitat antworten Zitat
t.roller

Registriert seit: 28. Mär 2016
255 Beiträge
 
#15

AW: Komponente zum abrufen des Batteriestatus

  Alt 21. Apr 2017, 06:55
Netzteil angeschlossen, Akku wird geladen.
Siehe Anhang:
Miniaturansicht angehängter Grafiken
fsystempowerstatus.jpg  
E = mc² is Energy = milk * coffee²
  Mit Zitat antworten Zitat
Ghostwalker

Registriert seit: 16. Jun 2003
Ort: Schönwald
993 Beiträge
 
Delphi 10.2 Tokyo Starter
 
#16

AW: Komponente zum abrufen des Batteriestatus

  Alt 21. Apr 2017, 08:37
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


Uwe
e=mc² or energy = milk * coffee²

Geändert von Ghostwalker (21. Apr 2017 um 08:43 Uhr) Grund: Fehler gefunden
  Mit Zitat antworten Zitat
Benutzerbild von jaenicke
jaenicke
Online

Registriert seit: 10. Jun 2003
Ort: Berlin
6.324 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#17

AW: Komponente zum abrufen des Batteriestatus

  Alt 21. Apr 2017, 08:57
Da habe ich damals ein paar Fehler gemacht...

Korrektur siehe Anhang...
PowerStatusInfo.pas
Sebastian Jänicke
Alle eigenen Projekte sind eingestellt, ebenso meine Homepage, Downloadlinks usw. im Forum bleiben aktiv!

Geändert von jaenicke (21. Apr 2017 um 11:01 Uhr)
  Mit Zitat antworten Zitat
t.roller

Registriert seit: 28. Mär 2016
255 Beiträge
 
#18

AW: Komponente zum abrufen des Batteriestatus

  Alt 21. Apr 2017, 10:51
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;
Miniaturansicht angehängter Grafiken
powerstatusinfo2.jpg  
E = mc² is Energy = milk * coffee²

Geändert von t.roller (21. Apr 2017 um 10:57 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von jaenicke
jaenicke
Online

Registriert seit: 10. Jun 2003
Ort: Berlin
6.324 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#19

AW: Komponente zum abrufen des Batteriestatus

  Alt 21. Apr 2017, 11:01
Argh, danke, ich habe den Anhang korrigiert...
Sebastian Jänicke
Alle eigenen Projekte sind eingestellt, ebenso meine Homepage, Downloadlinks usw. im Forum bleiben aktiv!
  Mit Zitat antworten Zitat
Ghostwalker

Registriert seit: 16. Jun 2003
Ort: Schönwald
993 Beiträge
 
Delphi 10.2 Tokyo Starter
 
#20

AW: Komponente zum abrufen des Batteriestatus

  Alt 23. Apr 2017, 01:29
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
Uwe
e=mc² or energy = milk * coffee²
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 05:31 Uhr.
Powered by vBulletin® Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2017 by Daniel R. Wolf