Delphi7中的加法问题

Question

  x:=StrToInt(Edit1.Text);
     y:=StrToInt(Edit2.Text);
        Edit3:=IntToStr(x+y);这样对吗

Answer 1

怎么发了两次？  x:=StrToInt(Edit1.Text); 
  y:=StrToInt(Edit2.Text); 
  Edit3.Text:=IntToStr(x+y); //Text属性才能赋值  1.显示需要用Text属性； 
2.当然要判断输入的text能不能转换为integer.

Answer 2

如果是整数计算，上面就没问题，
但是要在edit中限制只能输入‘0’~‘9’之间的数字
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if not (key in ['0'..'9']) then
    key:=#0;
end;其次如果不是整数计算，而是实数计算
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if not (key in ['0'..'9','.']) then
    key:=#0;
end;
  x:=StrToFloat(Edit1.Text); 
  y:=StrToFloat(Edit2.Text); 
  Edit3.Text:=FloatToStr(x+y);

Answer 3

StrToIntdef(string,integer)
StrToFloatDef(string,double)

Answer 4

因为edit里面的数据是字符串形式(string)的所以要先转换成整型(integer),然后进行运算，运算的结果是整型(integer)要想显示在edit里面就必须要转换成字符串形式(string)的，这个就是具体的思路了，很简单吧！还有就是lovelymelon提到的限制edit里面输入数字的方法，因为字符串是不能进行整数相加减的。