[ilichhernandez]

Hola, estoy tratando de generar varios tlabel en un formulario en tiempo de ejecucion, para mostrar una info, pero me lanza un error "Un error ha ocurrido mientras intenta inicializar el BDE (error $2501), pero primera vez que sale ese error y no se me ocurre por que, ya que el codigo para insertar 1 tlabel funciona, pero alñ agregarle el ciclo"exterior" para que cree los otros me sale el error antes mencionado.... agradeceria comentarios.....

Código Delphi [-]
 cont_nom := 1;
 cont_top :=0;
 dm.tcomparacion.open;
 dm.tcomparacion.First;
 With dm.tcomparacion Do
    Begin
      ana :=  FieldByName('analisis').AsString;
 
      with TLabel.Create(Form_comparacion ) do
      begin
         Parent  := Form_comparacion; 
         Left    := 250;                // X coordinate
         Top     := 250 + cont_top;     // Y coordinate
         Caption := ana;
         Name    := 'Labelx' + InttoStr(cont_nom);
         Visible := True;
      end;
    next;
    inc(cont_nom);
    inc(cont_top,10)
    end; //with dm.tcomparacion

Gracias de antemanos...!!