delphi – 如何读取和更改TEdit控件的值？

发布时间：2020-12-15 04:18:23 所属栏目：大数据来源：网络整理

导读：我有一个Form TForm1有5 TEdit和2 TBitBtn. 我还需要程序,以便在BitBtnClick上输入Edit1和Edit2中的数字数据后,Edit1和Edit2值将相加并将显示在Edit3中. 解决方法你想做这样的事情： var val1,val2,sum: Integer;...val1 := StrToInt(Edit1.Text);val2 := S

我有一个Form TForm1有5 TEdit和2 TBitBtn.

我还需要程序,以便在BitBtnClick上输入Edit1和Edit2中的数字数据后,Edit1和Edit2值将相加并将显示在Edit3中.

解决方法

你想做这样的事情：

var
  val1,val2,sum: Integer;
...
val1 := StrToInt(Edit1.Text);
val2 := StrToInt(Edit2.Text);
sum := val1 + val2;
Edit3.Text := IntToStr(sum);

如果你想要浮点运算就像这样做

var
  val1,sum: Double;
...
val1 := StrToFloat(Edit1.Text);
val2 := StrToFloat(Edit2.Text);
sum := val1 + val2;
Edit3.Text := FloatToStr(sum);

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!