#include "WinTmpl.h"
#include "WinTmpl.cpp"
// ここから上は変更してはいけない。
//
// コンパイルするときは、user32と gdi32をリンクしておく 
// BCC32の場合:      bcc32 -W Unit1.cpp
// または:           bcc32 Unit1.cpp -luser32 -lgdi32 
// Cygnus GCCの場合: g++ Unit1.cpp -mwindows -mno-cygwin
// または:	     g++ Unit1.cpp -luser32 -lgdi32
//
// 大域変数の宣言はこの辺り

/* 1 */

TForm::TForm() {
// ウインドウのサイズ・色はここで変更する
   Width =  640;
   Height = 480;

   Color = clWhite;
/* 2 */
}

void TForm::FormCreate(TObject* sender) {
// 描画用のウインドウが最初に作られるときに呼ばれる
/* 3 */ 
// Timerが必要な場合、ここでセットしておく
//   Timer->SetInterval(200);
//   Timer->SetEnabled(true);
}

void TForm::FormPaint(TObject* sender) {
// 描画を行なう
/* 4 */
}

void TForm::FormMouseDown(TObject* sender, TMouseButton which,
			  TShiftState shift, int x, int y) {
// マウスボタンが押されたとき
/* 5 */
}

void TForm::FormKeyDown(TObject* sender, WORD key, TShiftState shift) {
// キーボードが押されたとき
/* 6 */
}

void TForm::TimerTimer(TObject* sender) {
// Timerで一定時間ごとに呼ばれる
/* 7 */
}