俄罗斯方块4.txt

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

刚才为图形运动做好了准备，现在只要改变x,y就可以让图形动了
8.添加一个按钮Button1,改变它的文字为'向右'，并添加事件和代码
procedure TForm1.Button1Click(Sender: TObject);
begin
  x:=x+20;
  Repaint;
end;
同样添加'向左'的按钮Button2