Duda sobre Edits

[jhonny]

Ahhh, bueno, segun lo que te entiendo es que esos controles te permiten manejar los tipos de datos que alli se trabajen tal y cual como un campo de un DataSet...

Pero lo que necesitamos es guadar en un arreglo, los datos de 20 Edit en Form sin necesidad de asignar, uno por uno.

Mejor dicho, según lo que te entendi, de todas maneras abria que hacer codigo y quedaria algo asi:

Código Delphi [-]
var
  a :Array of Extended;
  x :Integer;
begin
  SetLength(a, 0);
  for x := 0 to ComponentCount - 1 do
    if Components[x] is TJvValidateEdit then
    begin
      SetLength(a, Length(a)+1);
      a[High(a)] := TJvValidateEdit(Components[x]).AsFloat;
    end;
end;

La unica diferencia radicaria en que ya no tengo que hacer la conversión con la función StrToFloatDef, si no que aprovecho la propiedad del TJvValidateEdit para realizar el ejercicio.