怎样用该控件调出Internet选项对话框

解决方案 »

  1.   

    加入下面的代码可以调用“Internet选项”的对话框用ShellExecute也可以
    WinExec('RunDLL32.exe Shell32.dll,Control_RunDLL InetCpl.cpl,,0', SW_SHOWNORMAL); 
      

  2.   

    const
      GUID_WebBrowser: TGUID = '{ED016940-BD5B-11cf-BA4E-00C04FD70816}';
    var
      CmdTarget:IOleCommandTarget;
      vaIn, vaOut: OleVariant;
      GUID: PGUID;
    begin
    GetMem(GUID,Sizeof(GUID^));
    GUID^ := GUID_WebBrowser;
    CmdTarget:=WebBrowser1.Document as IOleCommandTarget;
    if CmdTarget <> nil then
      try
        CmdTarget.Exec(GUID, 3, 0, vaIn, vaOut);
      finally
        CmdTarget._Release;
      end;
    FreeMem(GUID);
    end;
      

  3.   

    全屏和WebBrowser无关,是软件本身的功能!