调用弹出页面时,却把当前所看的页面替换了.....

还有一些电脑,把别的页面替换了,但又不弹出任何窗口,就是显示要调用11.jsp的页面

解决方案 »

  1.   

    winObj=window.open(openUrl, "", openWindowSty);
    --->>>
    winObj=window.open(openUrl, "_blank", openWindowSty);
      

  2.   

    JK_10000(JK) 
    按你说的改了之后,那些会替换已打开的一个页面,再弹出11.jsp的,还是这样的情况,而有一些电脑连弹出窗口都没有
      

  3.   

    应该去改你的delphi吧procedure OpenUrlDefBrowser(AHandle:HWND;AUrl:string);
    begin
      try
        shellexecute(AHandle, 'open', PChar(GetDefBrowser()), PChar(AUrl), nil, SW_NORMAL);
       //shellexecute(AHandle, 'open', 'Iexplore.exe', PChar(AUrl), nil, SW_NORMAL);
      except
      end;
    end;function GetDefBrowser():String;
    var
       Browser: string;
    begin
      Result := 'Iexplore.exe';
      with TRegistry.Create do
      try
        RootKey := HKEY_CLASSES_ROOT;
        Access := KEY_QUERY_VALUE;
        if OpenKey('htmlfile\shell\open\command\', false) then
          Browser := ReadString('');
        CloseKey;
      finally
        Free;
      end;
      if Browser = '' then exit;
      Browser := Copy(Browser, Pos('"', Browser) + 1, Length(Browser));
      Browser := Copy(Browser, 1, Pos('"', Browser) - 1);
      Result := Browser;
    end;
      

  4.   

    http://community.csdn.net/Expert/TopicView3.asp?id=5421518
    试下这种方式，不需要关闭当前窗口
      

  5.   

    把这个
     winObj=window.open(openUrl, "", openWindowSty);
      
    </script>
    <body>
    .........
    </body>
    </html>
    <script>
    window.opener=null;
    window.close()
    </script>
    改为：
     winObj=window.open(openUrl, "_blank", openWindowSty);//这个和二楼一样
      
    </script>
    <body>
    .........
    </body>
    </html>
    <script>
    window.opener.close()//不清空，直接关闭
    </script>
    有一些电脑连弹出窗口都没有
    这个只要打开IE--INTER选项－－隐私－－阻止弹出窗口，前面的钩取消，就行了
      

  6.   

    craft001wen() 
    你的方法我试了,按你处理的结果是,页面自己关闭的时候,多出了提示"是否关闭窗口..."连弹出窗口都没有出来,是被拦截了,但是会替换已打开的页面,这个问题还是没有解决,是不是IE设置的问题!我把会替换页面的电脑的IE改成不会替换页面的电脑IE设置,还是没有用.
      

  7.   

    我做delphi不是很久，但知道是delphi代码的问题
      

  8.   

    我做delphi也不是很久,请问有什么问题吗?
      

  9.   

    我上面有回啊
    ShellExecute第二个参数估计相当于html的target属性，不设置的话当然会覆盖啦
      

  10.   

    <script>
    window.opener=null;
    window.close()
    </script>
    请问LZ上面的代码用来做什么的啊??关掉本页面吗??
      

  11.   

    <script>
    window.opener=null;
    window.close()
    </script>
    是用来关闭本页面的
      

  12.   

    delphi中　
    1.标准用法 　　ShellExecute函数原型及参数含义如下： 　　function ShellExecute(hWnd: HWND; Operation, FileName, Parameters,Directory: PChar; ShowCmd: Integer): HINST; stdcall; 
    ●Operation：用于指定要进行的操作。其中“open”操作表示执行由FileName参数指定的程序，或打开由FileName参数指定的文件或文件夹；“print”操作表示打印由FileName参数指定的文件；“explore”操作表示浏览由FileName参数指定的文件夹。当参数设为nil时，表示执行默认操作“open”。
      

  13.   

    Click the link to solve your problem.Good luck!