这段代码在MFC里如何写

这段代码在MFC里怎么写?
uses      
    SHDocVw,       MSHtml,       ActiveX      
       
    var      
            E:       IHTMLElement;      
    begin      
       
            E       :=       (WebBrowser1.Document       as       IHTMLDocument2).elementFromPoint(Mouse.CursorPos.X,       Mouse.CursorPos.Y);      
            E       :=       (WebBrowser1.Document       as       IHTMLDocument2).elementFromPoint(100,       100);      
            Label1.Caption       :=       E.title;      
            Label1.Caption       :=       E.innerText;
---------------------------------------------------
我的程序是一个MFC对话框程序,里面有WebBrowser控件,我想获得鼠标经过超链接的时候获取该URL..

------解决方案--------------------
msdn.microsoft.com/workshop/browser/mshtml/tutorials/sink.asp
------解决方案--------------------
帮顶
------解决方案--------------------
DEPHI？这和VC可是有很大不同啊