Kann mit RegQueryValueEx etc. in Delphi nicht umgehen

[Chewie]

Danke bisher für deine Geduld, aber es ist noch nicht vorbei...

Folgender Schnipsel ist für mich relevant:

Zitat:

Code:

REG_SZ : 
      begin 
        pRegString := p_pValueData; 
        Result        := pRegString; 
      end;

Wenn der Reg-Eintrag also ein String ist, wird einer PChar-Variablen der Wert des Pointers zugewiesen. Einem String wird anschließend der Wert der PChar-Variable zugewiesen. Leider funktioniert das bei mir nicht. Der String ist leer.

Also bei folgendem Code bekomme ich eine leere Box:

Code:

  RegQueryValueEx(RegHnd, PChar('IsAlive'), nil, @dwValueType, pBuffer, @dwBufferLen);
  ShowMessage(RegDatatoString(dwValueType, pBuffer, dwBufferLen));

Der Typ und die Länge stimmen aber. Was hab ich falsch gemacht?

P.S.: Wie es schon in der Sesamstraße heißt: Wer nicht fragt, bleibt dumm.