在DELPHI中实现window.open一个URL(50分)

  • 主题发起人 主题发起人 Z_JJ
  • 开始时间 开始时间
Z

Z_JJ

Unregistered / Unconfirmed
GUEST, unregistred user!
在DELPHI中我是用shellexecute打开URL的,但请问如何实现window.open一个URL
就象HTML里用JAVASCRIPT:window.open( )
 
什么意思?
是要打开一个新打Form,在这个Form上显示这个URL呢,
还是打开一个新的浏览器,用这个浏览器打开一个URL
 
从浏览器打开url,用javascript:window.open打开
 
在use中加shellapi后用这个就行。
shellexecute(0,nil,pchar('http://www.163.com'),nil,nil,0);
 
HINSTANCE ShellExecute(

HWND hwnd, // handle to parent window
LPCTSTR lpOperation, // pointer to string that specifies operation to perform
LPCTSTR lpFile, // pointer to filename or folder name string
LPCTSTR lpParameters, // pointer to string that specifies executable-file parameters
LPCTSTR lpDirectory, // pointer to string that specifies default directory
INT nShowCmd // whether file is shown when opened
);
 
但是如果这样就不行了
shellexecute(0,nil,pchar('http://enterprise/ftp/目录.doc'),nil,nil,0);
 
ShellExecute(GetDeskTopWindow,'Open',pchar('http://enterprise/ftp/3/葵花宝典1[1].0.chm'),nil,nil,0);
时系统找不到此文件,因为里面有不能识别的中文字符,如果用 nmurl进行encode 在放入
也不能识别,说是找不到此文件,所以很让人头疼呀。
 
后退
顶部