Italia
Foro

CPU Temperatur mit "MSAcpi_ThermalZoneTemperature" auslesen

 

Michael
Axtmann
Ciao,
kennt sich jemand mit der "MSAcpi_ThermalZoneTemperature" aus? Ich bekomme das nicht wirklich hin....
Ich bin mir nicht einmal sicher, ob ich das richtig mache und ob das überhaupt supportati wird!? Das Programm corre zwar, aber es steht überall 0 drin.
Folgenden Code habe ich ausprobiert:
 $H windows.ph
Declare TempStat#

Proc ShowTemp

    Def MSAcpi_ThermalZoneTemperature(1)
    Def Temp(1)
    Dim TempStat#,32
    Long TempStat#,0=32
    MSAcpi_ThermalZoneTemperature(TempStat#)
    Print Temp(Long(TempStat#,4)),"Active"
    Print Temp(Long(TempStat#,8)),"ActiveTripPoint"
    Print Temp(Long(TempStat#,12)),"ActiveTripPointCount"
    Print Temp(Long(TempStat#,16)),"CriticalTripPoint"
    Print Temp(Long(TempStat#,20)),"CurrentTemperature"

Endproc

Cls
Decimals 0
ShowTemp
Waitinput
 
30.07.2012  
 




Dieter
Zornow
Dein Code potrebbe absolut falsch sein. Du solltest dich mal mit WMI befassen und dann wird das in etwa so ausgelesen.

SELECT FROM MSAcpi_ThermalZoneTemperature

Habe gerade keinen Code parat aber dieser Weg potrebbe zum Ziel führen
 
XProfan X2
Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2
30.07.2012  
 



Jo ist mit WMI zu regeln:  [...] 
 
31.07.2012  
 




Michael
Axtmann
Ciao,
vielen Dank, das mit dem wmi bekomme ich nun hin, wenn ich aber mit wmi etwas auslese, zB.

pm& = wmi_call("Select * from Win32_Processor","Manufacturer")

dann komme ich nicht an den String in pm& ran, damit ich mit DrawText Mostra kann!?
Mit GetText$ kann ich ja nur ein Handle eines Fensterobjektes abfragen, aber pm& liegt definitiv nicht im Fenster, mit String$ komme ich auch nicht dran...??????

Saluto
 
23.08.2012  
 



Beispiel ansehen:  [...] 

Rückgaben in der internen ListBoxListe!
 
23.08.2012  
 




Michael
Axtmann
Hallo, wenn ich das aber mit einer "unsichtbaren" Liste mache, dann bleibt mein String immer leer!!

pm& = wmi_call("Select * from Win32_Processor","Manufacturer")
Movehandletolist(pm&)
pmL& = Create("List", 3)
pm$ = GetString$(pmL&, 1)
print pm$

bei print kommt keine Anzeige!
 
23.08.2012  
 



Vielleicht GetString$(pmL&, 0) ?

Mache mal einfach listbox$("",0) ... zeigt ganze Liste...

Bitte Fonte mit Code-Tags posten:
//sieht dann so aus
print ...

while ...



2 kB
Hochgeladen:23.08.2012
Downloadcounter132
Download
 
23.08.2012  
 




Michael
Axtmann

 $H windows.ph
 $I wmi.inc
declare e%,pm&,pm$,listp&,pmL&
pm& = wmi_call("Select * from Win32_Processor","Manufacturer")
Movehandletolist(pm&)
pmL& = Create("List", 3)
pm$ = GetString$(pmL&, 0)
print pm$ + "Test Text"
waitinput
end

Das will nichts zurückliefern! Die ListBox$("",0) funktioniert immer! *Verwunder*
 
23.08.2012  
 




Michael
Axtmann

 $H windows.ph
 $I wmi.inc
declare e%,pm&,pm$,listp&,pmL&
pm& = wmi_call("Select * from Win32_Processor","Manufacturer")
Movehandletolist(pm&)
pmL& = Create("List", 3)
pm$ = GetString$(pmL&, 0)
print pm$ + "Test Text"
waitinput
end

sorry nochmal mit code.....
 
23.08.2012  
 




Dieter
Zornow
du musst ja auch deine Liste pmL& erst mal füllen
pm& = wmi_call("Select * from Win32_Processor","Manufacturer")
Movehandletolist(pm&)
pmL& = Create("List", 3)
movelisttohandle(pmL&)
pm$ = GetString$(pmL&, 0)
print pm$ + "Test Text"
waitinput

So müsste es gehen
 
XProfan X2
Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2
23.08.2012  
 




p.specht

Gruss von P. Specht. Dieses Thema interessiert auch mich.
Mit der obigen Cambiamento klappt das Auslesen. Leider will's mit
pm& = wmi_call("Select * from MSAcpi_ThermalZoneTemperature","CurrentTemperature")

aber nicht klappen. Wo hakt es da bitte?

Link auf die Struktur hier:  [...] 

Link auf das Rootverzeichnis root/WMI:  [...] 

P.S.: Leider weiss ich zuwenig circa die WMI.inc
 
Computer: Gerät, daß es in Mikrosekunden erlaubt, 50.000 Fehler zu machen, zB 'daß' statt 'das'...
27.08.2012  
 



Nicht alle Geräte unterstützen alle Eigenschaften und Nachsehen einfach z.B.

per WMI Code Creator (  [...]  ) .

Leider keine Ahnung wo genau man den zur Zeit zum Herunterladen angeboten

bekommt - würde mich aber interessieren.
 
28.08.2012  
 




Answer


Topictitle, max. 100 characters.
 

Systemprofile:

Kein Systemprofil angelegt. [anlegen]

XProfan:

 Posting  Font  Smilies  ▼ 

Bitte anmelden um einen Beitrag zu verfassen.
 

Topic-Options

22.790 Views

Untitledvor 0 min.
Selmo24.03.2019
Andre Rohland06.01.2019
maroro18.06.2018
Christof Neuß20.07.2017
Di più...

Themeninformationen



Admins  |  AGB  |  Applications  |  Autori  |  Chat  |  Informativa sulla privacy  |  Download  |  Entrance  |  Aiuto  |  Merchantportal  |  Impronta  |  Mart  |  Interfaces  |  SDK  |  Services  |  Giochi  |  Cerca  |  Support

Ein Projekt aller XProfaner, die es gibt!


Il mio XProfan
Private Notizie
Eigenes Ablageforum
Argomenti-Merkliste
Eigene Beiträge
Eigene Argomenti
Zwischenablage
Annullare
 Deutsch English Français Español Italia
Traduzioni

Informativa sulla privacy


Wir verwenden Cookies nur als Session-Cookies wegen der technischen Notwendigkeit und bei uns gibt es keine Cookies von Drittanbietern.

Wenn du hier auf unsere Webseite klickst oder navigierst, stimmst du unserer Erfassung von Informationen in unseren Cookies auf XProfan.Net zu.

Weitere Informationen zu unseren Cookies und dazu, wie du die Kontrolle darüber behältst, findest du in unserer nachfolgenden Datenschutzerklärung.


einverstandenDatenschutzerklärung
Ich möchte keinen Cookie