WebBrowserのNavigate処理を途中で完全に止めるには (ID:40333)

名前

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

本文 再現しません。 Windows7 + IE8 + Delphi2009 //http://www.wwlnk.com/boheme/delphi/tips/tec1620.htm procedure TForm1.Button1Click(Sender: TObject); var TabSheet : TTabSheet; WebBrowser : TWebBrowser; begin TabSheet := TTabSheet.Create(Self); TabSheet.Parent := PageControl1; TabSheet.PageControl := PageControl1; TabSheet.Caption := 'ブラウザ'; WebBrowser := TWebBrowser.Create(Self); TOleControl(WebBrowser).Parent := TabSheet; WebBrowser.Align := alClient; WebBrowser.Navigate ('http://syarecowa.moo.jp/'); WebBrowser.Free; end;