ＩＥのイベントを取得するには？

ＰＳＰ 2006-09-01 05:07:29 No: 23063 IP: 192.*.*.*

ＶＢで書くところの

Dim WithEvents IE As InternetExplorer

Private Sub Command1_Click()

  Set IE = CreateObject("InternetExplorer.Application")
  IE.Visible = True
  IE.Navigate2 "about:blank"

End Sub

Private Sub IE_DocumentComplete(ByVal pDisp As Object, URL As Variant)

  MsgBox "test"

End Sub

こんな事をDelphiでしたいのですが、どうすればいいのでしょうか？

編集削除

どうかな 2006-09-01 12:10:10 No: 23064 IP: 192.*.*.*

TInternetExplorerでウマクいけばラッキー。
ダメなら、TWebBrowserで。

編集削除

たべすぎ 2006-09-14 09:45:42 No: 23065 IP: 192.*.*.*

procedure TForm1.Button1Click(Sender: TObject);
var
  ie : Variant;
begin
  ie := CreateOleObject('InternetExplorer.Application');
  ie.Visible := True;
  ie.Navigate2('about:blank');
end;

※usesにComObjを追加してください。

編集削除

たべすぎ 2006-09-14 09:47:30 No: 23066 IP: 192.*.*.*

すみません↑の書き込みは無視してください。

編集削除