uses ShellApi;ShellExecute(Handle,'Open',pChar('HTTP://www.163.com'),nil,nil,SW_SHOWNORMAL);

解决方案 »

  1.   

    不明白你的意思,你是说直接弹出一个IE窗口还是说已经有了一个IE窗口但要在此窗口中新建一个超联结呢?
      

  2.   

    如果是弹出一个窗口,可以用楼上的,也可以用
    var
     App:variant;
    begin
      app:=CreateOLEObject('InternetExplorer.Application');
      App.Navigate('http://wwwwwwww');
      App.Visible:=true;
    end;
    如果是在IE窗口建立一个超连接,用记事本打开IE源码修改,添加一个
    新连接(编程实现),不知是否可行?