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; Top := 250 + cont_top; Caption := ana;
Name := 'Labelx' + InttoStr(cont_nom);
Visible := True;
end;
next;
inc(cont_nom);
inc(cont_top,10)
end;
Gracias de antemanos...!!