Символ "&" в реестре

[W0LF]

Здравствуйте... Работаю с реестром, немогу открыть ветку реестра, если в адресе есть символ "&"... Он пытается перейти по адресу в котором этот символ просто напросто пропущен. Почему так? И как можно это исправить?

PS: ручное дописывание не подходит... !

[TwiX]

Всё нормально работает:

with TRegIniFile.Create do
  begin
    RootKey:=HKEY_CURRENT_USER;
    ShowMessage(ReadString('My&Test', 'asd', 'Default'));
  end;

Показало - qwe, а не Default =)

[W0LF]

V Смотрите картинку V

uses 
  Registry;

var
  Reg: TRegistry;
begin

with Reg do begin
  TRegistry.Create;
  RootKey:=HKEY_LOCAL_MACHINE;
  OpenKeyReadOnly('SYSTEM\CurrentControlSet\Services\USBSTOR\Enum');
end;

  MessageDlg(Reg.ReadString('0'), mtInformation, [mbOk], 0);

  Reg.Free;
end;

[FaTaL]

Тоже только что проверил и всё работает. Вот мой код:

procedure TForm1.Button1Click(Sender: TObject);
var
  reg : TRegistry;
begin
  reg := TRegistry.Create;
  reg.RootKey := HKEY_LOCAL_MACHINE;
  reg.OpenKey('SYSTEM\CurrentControlSet\services\USBSTOR\Enum', false);
  MessageBox (Handle, PChar(reg.ReadString('0')), 'Test', mb_OK or mb_IconInformation);
  reg.CloseKey;
  reg.Free;
end;

У меня стоит Delphi 2010

[spamer]

Все работает. Пробовал код FaTaL.
з.ы. Делфи 7