2000.5.8 by R. Saito
プログラムの概要
ストップウオッチです。時間が来ると赤くなります。時間設定は
Edit の画面と Set/Reset ボタンでできます。
プログラムのポイント
Timer1->Enabled = true;
Timer1->Enabled = false;
を使います。
Timer1-> Enabled が true になると、Timer1 の イベントとして、
Ontimer を使い、 TForm1::ClockStart(TObject *Sender) を動かします。
true で有る限り繰り返し動作します。
void __fastcall ClockStart(TObject *Sender);
を設定しています。また関数は、
void __fastcall TForm1::ClockStart(TObject *Sender)
のように、TForm1:: をつけておかないと、関数のなかで
Label2->Caption= sec2; のような コンポーネントに関する指定が
できません。また、TObject *Sender を入れないと、OnTimer のイ
ベントの選択枝の中に出てきません。
プログラムの問題点
ソースプログラム(LZH 圧縮 file)
こんなプログラム例が欲しい (後の人への課題)
public: // ユーザー宣言
__fastcall TForm1(TComponent* Owner);
int sec1,sec2,stop;
rsaito@ee.uec.ac.jp