delphi小疑问
请问如何设置一个按钮，一点到它就不断执行按钮上加载的事件，知道点击另一个按钮才会停止，因为写了个选号的小程序，希望可以像电视上那样，一点就不断的刷 而不是点一下刷一下！！
两种方法
1.用timer去控制执行，两个按钮，一个启动timer，一个停止timer
2.做一个变量，代表是否执行，一个按钮事件中，判断这个变量，如果是false就不执行了
能不能写详细点呢，小弟弟我刚入门不久
选号的代码写在时钟Timer1里，然后通过按钮切换Timer1的Enabled属性
——————————
如果问题解决请及时结帖
timer的做法比较简单
按钮点击事件里
while true do begin
if not next then break;
加载的代码
app****.p***message;
end;
放两个按钮、一个编辑框，和一个时钟（System组件页）。
把时钟的Enabled属性设为False，Interval属性设为100，在OnTimer事件里头写上选号代码，如随机生成1 ~ 100的整数：
Randomize();
Edit1.Text := IntToStr(Trunc(Random(100)) + 1);
按钮1启动时钟，代码如：
Timer1.Enabled := True;
按钮2停止时钟，代码如：
Timer1.Enabled := False;
——————————
如果问题解决请及时结帖
相关问答：
如题。
感觉如何？交流下。
没有研究过，呵呵
有啥研究头？
那个东西，是个鸡肋，，没有什么意思，发现！！
用来做B/S架构的MIS系统的话应该可以提高界面开发的效率吧？
因为不熟悉Delphi � ......
type SFPRDA=packed record
czmm:Word; //操作密码。
sqcz:array[1..8] of packed record dm:Byte; mm:Word end;
//8个授权操作� ......
问问各位高手，1.ACCESS数据库能够存储图片格式的内容吗（JPEG BMP)，如果可以应该用什么格式
2.为了正确显示数据库中的图片delphi中应用到那些控件
......
向各位高手求助。
我用delphi2009编写了一个管理系统，使用的是access数据库。现在想通过多人一起录入数据后，将数据导出，导出的数据库包含多个相同的表。再将导出的数据依次导入到同一个数据库的相同表中，导入 ......
[size=18px]var s,n:integer;
begin
write('输入变长的条数n');
readln(n);
[color=#FF0000]s:=n*(n-1)*(n-2)div 6; //本行替换为s:=n*(n-1)*(n-2)/ ......
