Problem mit GetProcessAffinityMask [wie verwenden?]

[Daniel G]

N'Abend alle zusammen,

ich habe da ein kleines Problem mit GetProcessAffinityMask, das mich fast an den Rand des Wahnsinns treibt.

Also, bislang habe ich mir das zusammengesucht:

Delphi-Quellcode:

var
  hProcess: THandle;
  BitMask, SysBitMask: DWord;
begin
  hProcess := OpenProcess(PROCESS_QUERY_INFORMATION,true,GetCurrentProcess);
  GetProcessAffinityMask(hProcess, BitMask, SysBitMask);
end;

Nun sollen die Variablen "BitMask" und "SysBitMask" mir sagen, auf welchem Prozessor mein Programm läuft und wie viele Prozessoren mein Programm hat. Jage ich die Variablen aber durch den Debugger, haben sie verdammt große Werte, was ja irgendwie nicht die "BitMask" darstellen kann, oder?

Wie bekomme ich denn nun heraus, auf welchem Prozessor mein Programm läuft und wieviele Prozessoren das System hat? Das wäre wichtig für mich zu wissen, da ich im selben Atemzug auch noch SetProcessAffinityMask verwende und dort dann ja sicherlch dasselbe Problem auftreten wird.

Die "Remarks" habe ich natürlich gelesen und ich befürchte beinahe, dass das, was dort steht, verdammt wichtig ist.

Nur blicke ich da im Moment überhaupt nicht durch. Kann mir wer (mal wieder) helfen?

So long,
Daniel