Crear campos TFields en diseño

[jlrbotella]

Hola:

Y por último, ¿cómo puedo modificar la propiedad de displaylabel o displayformat, de un campo previamente creado en modo diseño?.

Más o menos lo haría así, pero no me funciona, porque la propiedad displayname no esta tfielddef.


Código Delphi [-]

var
i : integer;
campo : TFieldDef;
begin
ifxtable1.FieldDefs.Update;
ifxtable1.indexdefs.update;
for i := 0 to ifxtable1.FieldDefs.Count - 1 do
begin
campo := ifxtable1.FieldDefs[i];
campo.displaylabel := 'Mi campo';
ifxtable1.FieldDefs[i].Assign(campo);
end;
ifxtable1.FieldDefs.Update;
ifxtable1.indexdefs.update;
end;