Crear campos TFields en diseño

[jlrbotella]

Hola:

Ya he podido modificar las propiedades de los campos de una tabla, usando la siguiente forma:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  i : smallint;
begin
    for i := 0 to ifxtable1.FieldCount-1 do
    begin
        if ifxtable1.Fields[i].ClassName = 'TIntegerField' then
        begin
          (ifxtable1.Fields[i] as TIntegerField).DisplayFormat := '000';
        end;
    end;
end;

Pero no funciona si no obtienes la lista de fields desde el editor de comando, ¿alguién sabe como se hace esto en programación?.

Saludos,
JL