[TWebBrowser] Scriptで閉じるとエラーになる (ID:39404)

名前

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

本文 あ さん、ありがとうございます。 自動生成されたUnitに自力で追加したのは procedure TForm1.Button1Click(Sender: TObject); begin WebBrowser1.Navigate(Edit1.Text); end; initialization OleInitialize(nil); finalization OleUninitialize; これだけです。 また、こちらの環境ではWindowClosingというイベントがないのです。バージョンが違うのでしょうか。 SHDocVw.Pasのタイムスタンプは2002年9月6日、16:00:00で、ソースの先頭は // PASTLWTR : 1.1 // File generated on 7/26/99 12:22:56 PM from Type Library described below. となっています。 ソース中にもWindowClosingの文字が見あたりません。D8は持っていますので、D8で追加されて いるのでしたら、乗り換えるのですが。