TWebBrowserとTDBGrid (ID:44757)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 Harryさんのソースで、試しをしてみました。 Unit2で procedure FirstTimeNaviComp2(Sender: TObject; const pDisp: IDispatch; var URL: OleVariant); procedure AppEventsMessage(var Msg: TMsg; に対して constructor TWebBrowserFix.Create(AWebBrowser: TWebBrowser) で TWebBrowser(Self.Owner).OnNavigateComplete2:=FirstTimeNaviComp2; としているため、パラメータが足りないとエラーが出ます。 どのようにしたらいいのでしょうか。