怎么实现单击一次button显示一个数字？ - Delphi论坛

编程论坛 → 开发语言 → 『 Delphi论坛』 → 怎么实现单击一次button显示一个数字？

标题：怎么实现单击一次button显示一个数字？

只看楼主

Button

等　级：新手上路
帖　子：17
专家分：7
注　册：2009-9-14
结帖率：50%

楼主

已结贴√ 问题点数：20 回复次数：1

怎么实现单击一次button显示一个数字？

我随机生成一个数字怎么使用button控件单击一下显示一个数字？如第一次显示29 第二次紧接着 29，26 第三次紧接着29，26，23

搜索更多相关主题的帖子: 单击　 button　数字　

2009-09-27 20:40

mohao163

来　自：南宁
等　级：职业侠客
威　望：2
帖　子：79
专家分：383
注　册：2009-9-25

第 2 楼

得分:14

程序代码：

procedure TForm1.Button1Click(Sender: TObject); 
var 
 k: Integer; 
begin 
 
  Randomize; 
  k :=  Random(100); 

  edit1.Text := edit1.Text + IntToStr(k)+'  '; 

end;

2009-09-28 08:42

参与讨论请移步原网站贴子：https://bbs.bccn.net/thread-287109-1-1.html