本人初学delphi很菜的问题,大家来help一下 在线等候,马上加分! edit3.text=IntToStr(StrToInt(edit1.text)+StrToInt(edit3.text)) 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 注意char和string区别其实你最好用专门的转换函数,一般都是××To××的形式。祝你学习delphi愉快! 你这样作肯定是有问题的。char函数是用来把数字(例如ascii码等的必须小于255的数值)转换成可显示的字符或控制符号,总之它是不能用来处理字符串的。只能使用inttostr这样的函数,把它转成字符串数组(此时其实就是指针)才行。 你的代码的隐藏问题很多,完全解决应该这样:1、在Edit1和Edit2的OnChange事件中写入如下的代码:Try StrToFloat( Edit1.Text ); Button1.Enabled := True;Except Application.MessageBox( '输入的内容不是数字!', '错误', MB_OK + MB_ICONSTOP ); Button1.Enabled := False;End;2、在你的Button1的Click事件中下入:Edit3.Text := FloatToStr( StrToFloat( Edit1.Text ) + StrToFloat( Edit3.Text) ); 同意HZ_ZMD(爱到哪里都会犯错) 的,替yrwithsh(清脆的杯子)省一行代码! 哎呀,刚学真是什么都不会,希望诸位多多帮忙 如何取ppt中文本的链接地址 Delphi如何读取使用GBK字符集的数据库?在读取中文内容时出现错误,在线等待 不同系统的问题 我的IE 主頁被修改了 找视频采集的程序或者源代码 还是不行啊!!!!!!!!!!!! 急!!!高手请进~~ 求DELPHI中EXCEL整行或整列赋值 sql的别名 做父子关联的时侯问题? 送分!!!如何实现鼠标的隐藏和显示?
Try
StrToFloat( Edit1.Text );
Button1.Enabled := True;
Except
Application.MessageBox( '输入的内容不是数字!', '错误', MB_OK + MB_ICONSTOP );
Button1.Enabled := False;
End;
2、在你的Button1的Click事件中下入:
Edit3.Text := FloatToStr( StrToFloat( Edit1.Text ) + StrToFloat( Edit3.Text) );