我有这样一个需求,就是有一个文本框(里面是用来显示数字的)然后一个增加按钮 一个减少按钮。
我要实现的功能是:当点击一下增加按钮的时候文本框中就显示一个1字,再点一次就变成2,一次的点击几下就在2文本框中显示数字几(类似于计数器的样子)还有一个是减少按钮,效果同增加一样,点下减少就减少一个数字。
我要实现的功能是:当点击一下增加按钮的时候文本框中就显示一个1字,再点一次就变成2,一次的点击几下就在2文本框中显示数字几(类似于计数器的样子)还有一个是减少按钮,效果同增加一样,点下减少就减少一个数字。
解决方案 »
- 识别图像中的条码,下了一个东东叫:Pegasus SmartScan Xpress Barcode可是不知怎么用?
- 父类的虚拟方法为什么不能重写?
- 删除access数据库的问题
- 求画长方体不同角度投影算法或现成库
- 哪里能下加密方面的资料?
- wise怎樣在安裝文件完成安裝以後自動調用另一個安裝文件啊
- 为什么我的写数据库操作报No user transaction is currently in progress?
- ******** 小弟要找工作了,请大家帮帮忙!散分!!!********
- ***有无类似object Inspector这样的控件,功能不需那么强***
- 一个关于多线程的问题哦!(多个窗口)
- InterlockedExchange 怎么用于word变量?
- 有谁在用delphi2010?vclskin会让系统菜单消失?
增加按钮事件
label1.Caption := IntToStr(Inc(StrToIntDef(label1.Caption, 0)));减少按钮事件
label1.Caption := IntToStr(Dec(StrToIntDef(label1.Caption, 0)));
var
i:integer;
begin
i := StrToIntDef(label1.Caption, 0);
Inc(i);//减少用Dec(i);
label1.Caption := IntToStr(i);
end;