안녕하세요. 최용일입니다.

물론 API함수인 RegQueryValueEx를 쓰셔두 되지만 델파이의 TRegistry를 쓰신다면 굳이 이렇게 할 필요는 없습니다....

TRegistry.ReadBinaryData를 쓰시면 됩니다.

const
    SubKey: string = '서브키문자열......';
    ValueName: string = '값문자열......';
var
    RegFile: TRegistry;
    ValueSize: Integer;
    ValueBuf: PChar;
begin
    RegFile := Tregistry.Create;
    try
        RegFile.RootKey := HKEY_LOCAL_MACHINE;
        if RegFile.OpenKey(SubKey, False) then
        begin
            ValueSize := RegFile.GetDataSize(ValueName);
            GetMem(ValueBuf, ValueSize);
            try
                if RegFile.ReadBinaryData(ValueName, ValueBuf^, ValueSize) <> 0 then
                begin
                    ShowMessage(ValueBuf);
                end;
            finally
                FreeMem(ValueBuf);
            end;
        end;
    finally
        RegFile.Free;
    end;
end;

^^ 항상 즐코하세요...