Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Performance Counters + UAC Problem (https://www.delphipraxis.net/153488-performance-counters-uac-problem.html)

Shark99 5. Aug 2010 01:09

Performance Counters + UAC Problem
 
Ich benutze diesen Code um den Processor Performance Counter auszulesen (um den CPU Verbrauch pro Kern zu bekommen):
Delphi-Quellcode:
        while RegQueryValueEx( HKEY_PERFORMANCE_DATA, Processor_IDX_Str, nil, nil,
                PByte(_PerfData), @BS ) = ERROR_MORE_DATA do
        begin
            // Get a buffer that is big enough.
            INC(_BufferSize,$1000);
            BS:=_BufferSize;
            ReallocMem( _PerfData, _BufferSize );
        end;

        // Locate the performance object
        _POT := PPERF_OBJECT_TYPE(DWORD(_PerfData) + _PerfData.HeaderLength);
        for i := 1 to _PerfData.NumObjectTypes do
        begin
            if _POT.ObjectNameTitleIndex = Processor_IDX then Break;
            _POT := PPERF_OBJECT_TYPE(DWORD(_POT) + _POT.TotalByteLength);
        end;

        // Check for success
        if _POT.ObjectNameTitleIndex <> Processor_IDX then
        begin
            raise Exception.Create('Unable to locate the "Processor" performance object');
            Exit;
        end;
Es funktioniert problemlos unter WindowsXP.

Unter Vista (32 Bit) und 7 (64 Bit) bekomme ich jedoch eine Exception die aussagt dass der Performance Counter nicht gefunden wurde.

Starte ich jedoch meine exe als Administrator, dann funktioniert alles wunderbar.

Kann es denn wirklich war sein dass ich sogar für den lesenden Zugriff auf Performance Counters Admin Rechte brauche?

himitsu 5. Aug 2010 05:48

AW: Performance Counters + UAC Problem
 
Ein normaler Benutzer hat einfach nur keine Rechte, um auf HKEY_PERFORMANCE_DATA zuzugreifen.

Matze 5. Aug 2010 05:55

AW: Performance Counters + UAC Problem
 
Mir persönlich sagt "RegQueryValueEx" nichts.
Wenn du über TRegistry darauf zugreifen solltest, musst du beachten, dass
Delphi-Quellcode:
Reg := TRegistry.Create;
die vollen Zugriffsrechte (lesend und schreibend) anfordert. Du kannst jedoch manuell den reinen Lesezugriff über
Delphi-Quellcode:
Reg := TRegistry.Create(KEY_READ);
anfordern.
Ich weiß aber nicht, ob das etwas ändert.

@Frank: Das erscheint mir zwar etwas unlogisch, aber wenn das so ist, glaube ich's dir.

himitsu 5. Aug 2010 06:46

AW: Performance Counters + UAC Problem
 
Es könnte auch sein, daß nur Schreibzugriffe/-Rechte gesperrt sind (hab's jetzt nich nochmal ausprobiert, bin hier aber auch aktuell als Admin unterwegs :oops: ), aber mir ist so, als wenn alles gesperrt war/ist. :gruebel:

MSDN-Library durchsuchenRegQueryValueEx ließt einfach nur einen Wert aus ... wird auch intern von TRegistry verwendet.


Alle Zeitangaben in WEZ +1. Es ist jetzt 09:38 Uhr.

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