本文整理自网络,侵删。
if Button5.caption='开始' thenbeginButton5.caption:='停止';Timer1.Enabled:=true;Timer1.Interval:=5000;endelsebeginButton5.caption:='开始';Timer1.Enabled:=false;Timer1.Interval:=0;end;
相关阅读 >>
Delphi mysql里Delphi事件类型转unix时间戳
Delphi listboxadditems() 不重复添加edit1
Delphi动态创建tadoquery加access出现'不正常的定义参数对象 提供了不一致或不完整的信息'错误
更多相关阅读请进入《Delphi》频道 >>