Cargar esta web en un Twebbrowser problemas user agent

[cocute]

Muchas gracias, poniendo los datos a mano en el registro me funciona, pero la idea es que eso no lo tenga que hacer en cada ordenador que se ejecute,
ahora el problema es que no consigo meter la información al registro desde el propio programa,
he probado varios ejemplos pero en ningún caso me lo guarda en el registro, no se si es que windows8 teiene alguna restricción de permisos o algo,
por ejemplo esto no da error pero no me lo guarda en el registro

añadimos System.Win.Registry al uses

Código Delphi [-]

var
  Reg: TRegistry;
  Key: string;

begin
 Reg := TRegistry.Create;
  try
    Reg.RootKey := HKEY_CURRENT_USER;
    Key := 'SOFTWARE\Microsoft\InternetExplorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION';
    if Reg.OpenKey(Key, True) then
    begin
      Reg.WriteInteger('miaplicacion.exe', 110010);
      Reg.CloseKey;
    end;
  finally
    Reg.Free
  end;
end;

Luego aparte como deberia de meter el GetIEVersion de la función en vez de 110010?
ya que es un string y no puedo pasarlo a integer ya que no es un numero el resulado.


gracias

EDITADO: He añadido los TAG's a la parte de código.