Danke für die nette begrüssung
also mit den
api functionhab ich es schon versucht
Delphi-Quellcode:
if (RegOpenKeyEx(input_r.s1, PChar(input_r.s2), 0, KEY_READ, key) = ERROR_SUCCESS) then
begin
RegQueryValueEx(key, PChar(input_r.s3), nil, @vType, nil, @vLen);
ShowMessage(inttostr(vType));
end;
nur das ist merkwürdige das er nicht alle registry einträge erkennt
ich lese so 100 werte aus
er kennt aber nur 10, zwar richtig, aber leider nur die paar
die werte sie alle da
mit Reg.GetDataType erkennt er alle
hast du ne idee ?
Ps und habe ich
if (Reg.GetDataType(input_r.s3) = rdBinary) gegen
if (vType = REG_SZ) usw getauscht