delphi 如何在TEdit中创建一个减法和加法函数？[已关闭]

iugsix8n 于 2023-01-25 发布在其他

关注(0)|答案(1)|浏览(137)

- 已关闭**。此问题需要超过focused。当前不接受答案。
- 想要改进此问题吗？**更新此问题，使其仅关注editing this post的一个问题。

4天前关闭。
Improve this question
我是编程新手，我想做一个加减值的命令。
我有一个TEdit.Value，初始值为0，还有两个按钮，一个是"+"，一个是"-"，用来增加或减少值，但我仍然不知道怎么做，谁能给我一盏灯吗？
我查找了一些如何做到这一点的例子，但我没有找到任何可以帮助我。

delphi

来源：https://stackoverflow.com/questions/75190962/how-do-i-make-a-function-to-subtract-and-add-values-in-a-tedit

1条答案

按热度按时间

kmb7vmvb1#

您可以使用StrToInt()将Edit的当前Text字符串转换为整数，然后递增/递减整数，然后使用IntToStr()将整数转换为字符串并将其重新分配给Text属性。例如：

var Value: Integer := StrToInt(Edit1.Text);
Inc(Value); // or Dec()
Edit1.Text := IntToStr(Value);

但是，更好的选择是使用专门设计用于处理数字输入的UI控件，如TSpinEdit或附加到Edit控件的TUpDown。

赞(0）回复(0）举报 2023-01-25

我来回答

delphi 如何在TEdit中创建一个减法和加法函数？[已关闭]

1条答案

相关问题

热门标签

最新问答