送分～如何的到我的WebBrowser的父控件的信息？

Question

WebBrowser在sheet里，多个sheet在一个PageControl里，就和MyIe的结构一样，我因为每次新打开一个网页也就是新键一个sheet,所以我想根据这个新的webbrowser来得到他的父控件－－－sheet。
可是
(((Sender as WebBrowser).Parent) as TTabSheet)
会有问题～
应该怎么作啊？

Answer 1

你的Sender是什么事件里面定义的？？你可以这样看ShowMessage(Sender.ClassName);Sender到底是什么类型的

Answer 2

Sender当然是TWebBrowser 类型啊～
因为我是根据WebBrowser的事件来做的

Answer 3

ShowMessage((((TWinControl(Sender as TWebBrowser)).Parent).ClassName));也是对的，类型是TTabSheet，正确
可是我就是要的到这个sheet，
(((TWinControl(Sender as TWebBrowser)).Parent）) As TTabSheet;
这样出错，那我改怎么得到

Answer 4

((((TWinControl(Sender as TWebBrowser)).Parent)) AS TTabSheet).Caption := (Sender As TWebBrowser).LocationName;
可以了现在又有一个问题了，这个Sheet的Caption有时候文字，如”欢迎光临上海热线“，而有时候是URL。
我明明写的是LocationName啊

Answer 5

那你用：
uses MSHTML.
然后
IHTMLDocument2(WebBrowser1.Document).location.href 
呵呵，要睡觉了。有问题明天继续