Converting Real type to integer type 1

[Leo]

Accepting input from a TEdit box. I want to be able to be able to handle this if a real number (with decimal point) is entered. Would also like to convert this to an integer type. It was easy in Pascal 7 but I don't see it in the Delphi help files.

 

[3491]

{with}<br>
var<br>
s:string; <br>
x:real;<br>
n:integer;<br>
<br>
.....<br>
s := edit1.text;<br>
x := strtofloat(s);<br>
n := round(x);<br>
<br>
{to show result}<br>
edit1.text := floattostr;<br>
{This works whether or not text is a real number}<br>
{Error checking can be added to determine whether text is a number at all}

 

[benkiliane]

Try with the :
function FormatFloat(const Format: string; Value: Extended)
and for Format you can see the Delphi Help to presice your format.
I hope it can work.

 

[suryakartilas]

HI..
I want to conver the string in my text box become a decimal..
Do you know how to do it ??

I also want to make validation in my text box, that only number can be entered there, can you show me guys ???