Delphi はじめの一歩

ブラウザを作る

<Lesson12> 完成

ステータスバーを貼り付けます。
WebBrowser1が選択されている状態で、コンポーネントパレットのWin32タブからStatusBarを選びダブルクリックで貼り付けます。

初めからAlignがalBottomになっているので、下にくっつきます。

下図の処理は、ステータスバーのテキストが変わったら、それをStatusBar1に表示させる。という意味です。

これで完成です。
まだこのブラウザには問題がありますが、とりあえずここまでとします。
次で、補足説明をして、今回の分は終わりにします。