|
|
||
| 解説： Timer コンポーネントは Interval プロパティにイベントが発生する間隔を設定して、Enabled を true にすると動き始めます。 今回は、Timer を使って、フォームの背景色を定期的に変えてみます。 使用例： 以下では、フォームの背景色を Timer を使って、指定間隔で変更しています。 コンポーネントは、 Timer を適当に配置するだけです。 オブジェクトインスペクタで Interval に 500 を設定しておいてください。 Timer1 の OnTimer イベントハンドラで Interval プロパティで指定された時間が経過したら、フォームの色を青に変えています。 //------------------------------------------------------------------- void __fastcall TForm1::Timer1Timer(TObject *Sender) { if (Color == clBtnFace) Color = clBlue; else Color = clBtnFace; } //------------------------------------------------------------------- |