请问一下以下代码错在哪?怎么改?! ( 积分: 5 )

  • 主题发起人 主题发起人 高手贵姓
  • 开始时间 开始时间

高手贵姓

Unregistered / Unconfirmed
GUEST, unregistred user!
a: string;
b: integer;

a := (strtoint(Edit8.Text))*50

b := inttostr(a);
比如Edit8中输入字符串是70,我想得到70乘以50的结果3500,这个3500依然要返回为字符串;
 
b: integer;
b是数字
a: string;
a是字符串
错误1 inttostr(a);函数inttostr里面的参数必须是数字,而a是字符串.
错误2 b := inttostr(a)
inttostr函数的结果是数字,不能把数字赋值给字符串.
你刚学delphi没有几天的吧,这些问题高手不会回答你的,象我这些的菜鸟才会热心的敲了一堆字拉你一把.哈哈~~~


a: string;

a := inttostr(strtoint(Edit8.Text) * 50)


这样就是你要的答案.
 
接受答案了.
 
后退
顶部