| Class TForm1 (unit Animunit) |
TForm
Renamed from Aniunit.pas 6/13/1998 Paul Rice to avoid conflicts with others' work.
| Constructors |
| Functions |
procedure BombChangeFrame(Sender: TObject);
procedure BombClick(Sender: TObject);
procedure BulbClick(Sender: TObject);
procedure CoinClick(Sender: TObject);
procedure CrumbleClick(Sender: TObject);
procedure ExplodeClick(Sender: TObject);
procedure FormActivate(Sender: TObject);
procedure TrafficLightClick(Sender: TObject);| Properties |
| Events |
| Variables |
Bomb : TAnimated;
BombButton : TButton;
Bulb : TAnimated;
BulbButton : TButton;
CoinButton : TButton;
Coins : TAnimated;
Crumble : TAnimated;
CrumbleButton : TButton;
Explode : TAnimated;
ExplodeButton : TButton;
Pencil : TAnimated;
TrafficLight : TAnimated;
TrafficLightButton : TButton;| Constructors |
| Functions |
procedure BombChangeFrame(Sender: TObject);
procedure BombClick(Sender: TObject);
procedure BulbClick(Sender: TObject);
procedure CoinClick(Sender: TObject);
procedure CrumbleClick(Sender: TObject);Incrementing wraps around at FrameCount
procedure ExplodeClick(Sender: TObject);
procedure FormActivate(Sender: TObject);
procedure TrafficLightClick(Sender: TObject);| Properties |
| Events |
| Variables |
Bomb : TAnimated;
BombButton : TButton;
Bulb : TAnimated;
BulbButton : TButton;
CoinButton : TButton;
Coins : TAnimated;
Crumble : TAnimated;
CrumbleButton : TButton;
Explode : TAnimated;
ExplodeButton : TButton;
Pencil : TAnimated;
TrafficLight : TAnimated;
TrafficLightButton : TButton;