| 第2章-3 ScrollBar,Sliderの使い方 |
|
今回はサンプルとしては次のようなものを作ります。ScrollBarかSliderを操作するとその時の位置を StaticTextに表示します。それだけ...。ScrollBarも、Sliderもフルスケールを100と設定しています。
まずはScrollBarですがScrollBarはツールウィンドゥの赤丸で囲んだ部分がそれです。これを、ドラッグ& ドロップでwindow1に配置します。
プロパティは次のように設定します。
さて、コードですが、コードエディタのコントロールのValueChangedに次のように書きます。
StaticText2.Text = Str(ScrollBar1.Value)
たったこれだけです。いつもながら簡単ですね。 また、プグラム起動直後にもStaticTextになにか初期値を表示しておきたいのでOpenイベントにも StaticText2.Text = Str(ScrollBar1.Value) と書いておきます。
さて、次にSliderですが.....。全く同様に作ればできますので説明は省略します。 |
| 目次に戻る |