在Twebbrowser中无法复制网页内容,请教如何解决,十万火急,在线等待 (100分)

  • 主题发起人 主题发起人 jhonline
  • 开始时间 开始时间
J

jhonline

Unregistered / Unconfirmed
GUEST, unregistred user!
我在使用TWebBrowser中发现不能复制其中显示的网页内容,使用默认的右键菜单中的
‘复制’或ctl_c都无效,剪贴版里无内容。我在win2000+ie5+delphi5下使用,其后在
多台机子上测试(win98,delphi6等)都无法进行复制。
另ie上进行复制一切正常。
谢谢各位高手赐教
 
要是你能借助SHELLAPI,那一切就变得容易得多了
 
这个问题我以前碰到过,后来解决了,
我记得好像是用上ole2。。单元,然后要初始化什么,
具体忘了,要回去找找源码。。。。
 
能说的具体一点吗
因为TWebBrowser提供与ie相同的右键菜单,可就是‘复制’没有效果,其他的都是好的
不知道是不是控件有问题
 
feizi:
麻烦找一下,谢谢
 
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
);
 
看话题394398
 
林中水滴:
你的意思是不是直接调用ie,不使用TWebBrowser控件?
 
是的,那就可以省去一切的麻烦了
 
uses olectrls,activex;
然后加入下列代码就够啦.

initialization
OleInitialize(nil);

finalization
OleUninitialize;



 
林中水滴
那样的话,打开一个ie窗口,就达不到要求了,我需要象腾讯的浏览器的效果
而且消息也没了
还是很感谢你
 
多谢xeen, peng_qs
 
第四个参数就是用来传递信息的,例如
ShellExecute(handle,nil,pchar('IEXPLORE.EXE'),pchar(edHtml.text),Nil,SW_shownormal);

不知道你是否要达到这样的要求
 
林中水滴:
我这里的要求是要在程序里开多个页面,而且我要得到返回的消息,譬如页面下载完成这类
事件
用shellexecute就另开了一个窗口

谢谢你的帮助
 
后退
顶部