Crear series dinamicamente

[vivamotos]

Buenos días,

Tengo problemas al crear series dinamicamente mirad mi codigo

//grafico es el TChart
TFastLineSeries *SerieLineas;
grafico->SeriesList->Clear();
for(indice=1;indice<x;indice++)
{
           //creo las series dependiendo de x
           SerieLineas=new TFastLineSeries(grafico);
           SerieLineas->ParentChart=grafico;
           SerieLineas->LinePen->Width=3;
           SerieLineas->Marks->Visible=true;
           SerieLineas->Marks->FontSeriesColor=true;
           SerieLineas->Marks->Font->Size=7;
           SerieLineas->Marks->Transparent=true;
           SerieLineas->Marks->Style=smsValue;
           SerieLineas->Color=taula_colors[indice];
           SerieLineas->Title=aux;

           grafico->Series[indice]->Add(tal...)
}

Hasta aquí todo correcto, me genera el gráfico de maravilla pero siempre al cerrar el programa me da un "access violation"!.

Si no genero el grafico se cierra bien, pero a la que lo genero y cierro el programa patapam (ESTO a veces)

Quisiera saber si lo estoy haciendo bien.

Grácias.