Class TForm1 (unit Form)

Inherits from

TForm

Task: Change & Animate Mouse Cursors Author: Doug Colman (doug@neumann.une.edu.au) Date: January 12th 1996 Version: 1.0 Compiler: Borland Delphi 1.0 Input: User Clicks Output: Cute Mouse Cursors

Constructors



Functions

procedure Button1Click(Sender: TObject);

hands:

procedure Button2Click(Sender: TObject);


procedure Button3Click(Sender: TObject);


procedure Button4Click(Sender: TObject);


procedure Button5Click(Sender: TObject);


procedure Button6Click(Sender: TObject);


procedure FormCreate(Sender: TObject);

arbitrary number

Properties

Events

Variables

Button1 : TButton;


Button2 : TButton;


Button3 : TButton;


Button4 : TButton;


Button5 : TButton;


Button6 : TButton;


Label1 : TLabel;



Constructors


Functions


procedure Button1Click(Sender: TObject);

hands:


procedure Button2Click(Sender: TObject);


procedure Button3Click(Sender: TObject);


procedure Button4Click(Sender: TObject);


procedure Button5Click(Sender: TObject);


procedure Button6Click(Sender: TObject);


procedure FormCreate(Sender: TObject);

arbitrary number


Properties


Events


Variables


Button1 : TButton;


Button2 : TButton;


Button3 : TButton;


Button4 : TButton;


Button5 : TButton;


Button6 : TButton;


Label1 : TLabel;