TWinControl
A-1 :既存クラスの利用例2


 はじめに                 / A-2  A-3   A-4   A-5   A-6  
この章では、TWinControl について細かく解説をしていこうと思います。
オブジェクト指向という概念からは少々道が反れますが、プログラミングをする上で重要と思われる個所なので個別にやっていくことにしました。

ここの章も前章(1〜3章)同様に、なるべく分かり易く記述しているつもりですが、どうしても分からない個所があったら何度となく前章に戻り、ちゃんと理解を深めた上で取り組んでみて下さい。

また、分かりづらい個所には特別なリンクを設置しています。
それらを参考に本章を進めていきましょう。




今からやること
 1:まずはSection1 で出てきた TWinControlSelf の二つについての理解を深めます。
 2:次に TWinControl と継承の関係を探り、
 3:最後にオブジェクトの複数生成(ネコ盛りだくさん)を実感してみます。



用意するもの
Section1 で作ったプログラムを準備して下さい。
今回は継承をより分かり易いものにする為に、Section1 で作成したソースを元に、 Section2 でのソースを追加、比較してプログラムをしていきたいと思います。

・2枚のビットマップ ( 50×50ドットくらいが望ましい : 自分の好きな絵を左右対象に描きましょう)
・音源ファイル    ( wav や mid など : 効果音として使用します)

    Cat1.bmp        Cat2.bmp       Cat1.wav








 フォームの配置とコンポーネントのプロパティ


      フォーム
ベースは Section1 と同じ感じですが、 新たに TMemo コンポーネントを貼り付けて、 左図のように各コンポーネントを配置します。

以下にフォームやボタンの詳しい位置プロパティを記しておきました。
Section1 と同様に、これは自由に変更してOKです。

尚、変更してもいいプロパティは、
Height : Width
Left   : Top
Lines  : Caption
の6項目です。
コンポーネントとプロパティ
コンポーネント プロパティ 変更後の値
Form1
Caption Name Heght Width CatWalk1 MainForm 240 240
Timer1 Name Enabled Interval T1 False 40
MediaPlayer1 AutoOpen AutoRewind DeviceType FileName Name Visible VisibleButton True True dtAutoSelect メディアファイルの場所を設定 MP False btPlay 以外のすべてを False に
Button1 Caption Left Name Top ネコ A 152 B1 8
Button2 Caption Left Name Top ネコ B 152 B2 48
Button3 Caption Left Name Top ネコ C 152 B3 8
Memo1 Height Lines Name Top Width 160 ネコが動く Memo 100 315




 ここからが大切!

Section 2 の第一の山場となるのはここからです。
しっかりと見ていきましょう



2 つ目のフォームを作る
Delphi ツールバーの、新規作成 > フォーム を選択して下さい。
新たにフォームが生成されたと思います。
Section 2 の始めに作成するプログラムでは、 この 2 つのフォーム間をネコが瞬間移動をするというものです。




左が二つ目のフォームの配置です。
フォーム2は、必ず Visible を True に設定して下さい。

フォーム1同様、以下にフォームやボタンの位置プロパティ等も 記しておきました。
尚、変更してもいいプロパティは、
Height : Width
Left   : Top
Caption の 5 項目です。


このフォームにはメモコンポーネントがないので、 『 Lines 』プロパティはありません。



プロパティ
コンポーネント プロパティ 変更後の値
Form1
Caption Name Heght Visible Width CatWalk2 MainForm 240 True 240
Timer1 Name Enabled Interval T1 False 40
Panel1 Caption Height Name Width パネル 97 Panel 250
Button1 Caption Left Name Top 移動ネコ A 72 B1 16
Button2 Caption Left Name Top 移動ネコ B 160 B2 16
Button3 Caption Left Name Top 移動ネコ C 248 B3 16
Button4 Caption Left Name Top ボタン 152 Button 8
トップに戻る  /  次へ