Embarcadero hat die Funktion "RegQueryValueEx" auf der Seite "
Anwendungen für Unicode
anpassen" unter Punkt 2.7 beschrieben:
Früher:
Len := MAX_PATH;
RegQueryValueEx(reg, PChar(Name), nil, nil, PByte(@Data[0]), @Len)
Ab Delphi 2009 (
Unicode):
Len := MAX_PATH *
SizeOf(Char);
RegQueryValueEx(reg, PChar(Name), nil, nil, PByte(@Data[0]), @Len)