[[oscarac]]

buenas noches...
estoy tratando de crear una tabla usando ClienDataSet (si alguien conoce otro metodo aviseme por favor), el echo que uso este componente, es que quiero crear los campos de manera aleatorea (no siempre seran los mismos)

estoy haciendo mas o menos asi

Código Delphi [-]
 
 CDSFacturacion.FieldDefs.Add('CCosto', ftString, 10);
  CDSFacturacion.FieldDefs.Add('Codigo', ftString, 10);
  CDSFacturacion.FieldDefs.Add('Trabajador', ftString, 80);
  if x = 1 then _campo1 := 'Desa';
  if x = 2 then _campo1 := 'Almu';
  if x = 3 then _campo1 := 'Sala';
  if x = 4 then _campo1 := 'Lonc';
  if x = 5 then _campo1 := 'Cena';
  if x = 6 then _campo1 := 'Aman';
  with CDSFacturacion do
  Begin
    with FieldDefs.AddFieldDef do
    Begin
      DataType := ftInteger;
      Name := _Campo1;
    end;
  end;
  CDSFacturacion.CreateDataSet;
  CDSFacturacion.Active := True;
  CDSFacturacion.Open;

cuando llega al open me sale un mensaje que dice mas o menos asi

CDSFacturacion : Cannot perform this operation on an open dataset


alguien podria explicarme este error o que estoy haciendo mal o si existe otro metodo?