mostrar archivos en Label

[andres_89]

Hola ecfisa,

tu codigo me funciono bien, solo un inconveniente:

void __fastcall TForm1::FormDestroy(TObject *Sender)
{
  delete FileNames;
}

por teoria sé que el código me sirve para liberar lo creado o eliminar lo que cree temporalmente en la memoria en este caso del Form1, pero me sale un error:

[bcc32 Error] Unit1.cpp(83): E2316 '_fastcall TForm1::FormDestroy(TObject *)' is not a member of 'TForm1'

quitandolo se me soluciona y funciona normal, mi duda vendria, exactamente como aprovecharia ese codigo, o quizas me falto agregar algo al codigo?, igual gracias, trabajare en ello.