俄罗斯方块5.txt

来自「学习Delphi最好的教材。通过一个个简单而实用的实例」· 文本 代码 · 共 9 行

增加向下运动的功能
9.向窗体添加一个定时器Timer1,并添加事件和代码
procedure TForm1.Timer1Timer(Sender: TObject);
begin
  y:=y+20;
  Repaint;
end;