Agregar Campos Fields Editor en ejecución

[subzero]

Hola...

He estado buscando en los post's anteriores, pero no he logrado encontrar algo que resuelva mi inconveniente.... sucede que estoy generando diferentes consultas las cuales quiero mostrar en un mismo dbgrid, dependiendo la opción que tome el usuario desde un RadioGroup, de acuerdo a la selección se ejecutará una consulta... pues bien sucede que me gustaria por medio de código definir cuales seran los campos que se cargaran en el Fields Editor (IBQuery). Estoy utilizando Delphi 7 y Firebird 2.0.

Ya he tratado borrando lo que se encuentra en el Editor con esta linea

Código PHP:

IBQuery.Fields.Clear; 


y luego haciendo esto...

Código PHP:

IBQuery.Fields.Add('campo');
ó
IBQuery.Fields.Add(FieldByName('FECHA')); 


Alguna idea?

[jhonny]

Para agregar un campo a un DataSet, debe funcionarte asi:

Para este ejemplo creare un campo de tipo string, pero de la misma manera podrias crearlo para otros tipos

Código Delphi [-]
var
  CampoNuevo :TStringField;
begin
  CampoNuevo := TStringField.Create(IBDataSet1);
  CampoNuevo.FieldName := 'CampoNuevo';
  CampoNuevo.Size    := 10;
  CampoNuevo.DataSet := IBDataSet1;

Espero te sirva .

[subzero]

Gracias, lo voy a revisar a ver que tal me va, sin embargo por el momento inclui un nuevo IBQuery, para que se cargaran los campos en el editor, y en tiempo de ejecución cambio a cual de los dos IBQuery debe apuntar la consulta para que se muestre e un DBGrid....