射击小游戏练习.txt

学习Delphi最好的教材。通过一个个简单而实用的实例

保存当前的程序(Save All)
关闭当前的程序(File-->Close All)
1.建一个文件夹，用于放程序。
2.新建一个程序。
3.保存(用Save All)
4.添加两个"几何"(Shape)控件(在控件栏的第二页"Additional"),
把第二个的形状(Shape属性)改为"圆的"(stCircle)
5.添加两个"定时器"(Timer)控件，分别让Shape1向右、Shape2向上运动，
即双击Timer1,添加事件，并添加代码
procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Shape1.Left:=Shape1.Left+5;
end;
即双击Timer2,添加事件，并添加代码
procedure TForm1.Timer2Timer(Sender: TObject);
begin
  Shape2.Top:=Shape2.Top-5;
end;