如何做到让两个EDIT控件内容相乘得出结果后显示在第3个edit控件里？

Question

如图做到第一个EDIT里的数字乘以第二个EDIT里的数字的百分比后得出结果显示在第三edit栏内？

Answer 1

edit3.text:=inttostr(strtoint(edit1.text)*strtoint(edit2.text));

Answer 2

图片里的内容看不到。
edt3.Text := FloatToStr(StrToFloat(edt1.Text) * StrToFloat(edt2.Text));

Answer 3

edt3.Text := CurrToStr(StrToCurr(edt1.Text) * StrToCurr(edt2.Text));
1樓的不安全，如果涉及小數，那得出錯了 

Answer 4

那   乘以edit2的百分比如何写？

Answer 5

图片大概是
edit1控件   edit2控件   edit3控件edit2内不填写%号只是填写数字 但是运算是看成“edit2%”  edit3是结果  保留小数点后2位数字！

Answer 6

edit1 是基数   
运算大概是这样形势edit1数 X  EDIT2 % = EDIT3保留小数点后2位！！

Answer 7

那这样
edit3.text:=floattostr(strtofloat(edit1.text)*strtofloat(edit2.text)/100);

Answer 8

上面没有看到保留小数点两位,这样
edit3.text:=format('%.2f',strtofloat(edit1.text)*strtofloat(edit2.text)/100);

Answer 9

再发一次,上面忘了加中括号
procedure TForm1.Button1Click(Sender: TObject);
begin
edit3.text:=format('%.2f',[strtofloat(edit1.text)*strtofloat(edit2.text)/100]);
end;

Answer 10

edit3.text:=format('%.2f',[strtofloat(edit1.text)*strtofloat(edit2.text)/100]);