edit Str a float

[BrunoBsso]

Hola.
Sí o sí vas a tener que hacerlos uno por uno.
Podrías hacer un casting como

Código Delphi [-]
var
  I:Integer;
  F:Real;
for I:=0 to FormAlgo.ControlCount-1 do begin
  if (FormAlgo.Controls[i] is TEdit) then
    F:=StrToFloat(TEdit(FormAlgo.Controls[i]).Text);
end;