[Anton93]

Требуется изменить значение в реестре у REG_Dword, вроде все правильно значение меняется но на какое-то непонятное значение:

Код:

var
  Key:HKEY;
  Value: Byte;
begin
  Value:=0;
  RegCreateKeyEx(HKEY_CURRENT_USER,'Software\MyProg\Hide\',0,nil,REG_OPTION_NON_VOLATILE,KEY_ALL_ACCESS,Nil,Key,nil);
  RegSetValueEx(key,'HideFile',0,REG_DWORD,@Value,SizeOf(Cardinal));
  RegCloseKey(Key);
end;

[Uniq!]

А класс TRegistry разве не для работы с реестром предназначен? Зачем Api?

[Alegun]

Код:

function RegSetDword(RootKey: HKEY; Name: string; Value: Cardinal): boolean;
begin
 Result := RegSetValue(RootKey, Name, REG_DWORD, @Value, SizeOf(Cardinal));
end;

[Anton93]

Да есть такой, но смысл, да легче но, API по мне так лучше)

[icWasya]

Пишешь в реестр четыре байта. А

Код:

Value:Byte;

То есть один байт значение, и три байта мусора.