Foros Club Delphi - de str afloat con componentcount

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)

- - de str afloat con componentcount (https://www.clubdelphi.com/foros/showthread.php?t=70960)

Kamael

21-11-2010 12:42:21

de str afloat con componentcount

Quiero pasar 10 edit de strtofloat con este codigo :

Código:

var

i : integer ;



begin

for i := 0 to ComponentCount -1 do

if Components[i] is TEdit then

begin

StrtoFloatDef(TEdit(Components[i]).Text,0);

end ;

hasta ahí todo bien(eso creo), pero cuando le introduzco a los edit los numeros a sumar me los suma como edits string.Por ejemplo

Código:

FloatToStr(edit3.Text) := Edit1.Text+Edit2.Text ... ;

Edit3 = 1+3 = 13 en vez de 4

A que es debido esto si los edits los tengo convertidos a float?

marcoszorrilla

21-11-2010 13:21:01

Cita:

Empezado por Kamael (Mensaje 382909)

Quiero pasar 10 edit de strtofloat con este codigo :

Código:

var

i : integer ;



begin

for i := 0 to ComponentCount -1 do

if Components[i] is TEdit then

begin

StrtoFloatDef(TEdit(Components[i]).Text,0);

end ;

hasta ahí todo bien(eso creo), pero cuando le introduzco a los edit los numeros a sumar me los suma como edits string.Por ejemplo

Código:

edit3.Text :=FloatToStr( StrToFloat(Edit1.Text)+StrToFloaat(Edit2.Text) )... ;

Código:

Edit3 = 1+3 = 13 en vez de 4

A que es debido esto si los edits los tengo convertidos a float?

Un Saludo.

Kamael

22-11-2010 22:22:04

Yo pensaba que pasando todos los edit a float no tendria que volver a convertirlos.
Suponiendo que el codigo inicial me los convierta, claro.
Gracias por contestarme marcoszoriilla

La franja horaria es GMT +2. Ahora son las 02:24:27.