俄罗斯方块6.txt

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

增加暂停的功能
10.向窗体添加一个按钮Button3,文字改为"暂停",并添加事件和代码
procedure TForm1.Button3Click(Sender: TObject);
begin
 Timer1.Enabled:=False;
end;