C/C++ - Lettura file con OpenDialog C++ Borland

Ciao a tutti.

Sto cercando di aprire il contenuto di un file testo riga per riga, con c++ borland.
Sto usando il componente opendialog.
Il programma funziona solo la prima volta.

La seconda volta, mi dice che FileIn è NULL, nonostante andando in debug, il nome del file viene passato correttamente.

Mi dite dov'è che sbaglio?

Grazie.

void __fastcall TForm1::btn_sfogliaClick(TObject *Sender)
{
        char *app_nomefile;
        char *s = "";
        FILE *FileIn;

        if(OpenDialog1->Execute())
        {
                txt_nomefile->Text= OpenDialog1->FileName;
                strcpy (app_nomefile,OpenDialog1->FileName.c_str());
                FileIn = fopen(app_nomefile,"r+");


                if(FileIn != NULL)
                {
                        while(!feof(FileIn))
                        {
                                fgets(s,1000,FileIn);
                                list_contenuto -> Items -> Add (s) ;
                        }

                }
                else
                {      
                       list_contenuto -> Clear();
                       ShowMessage("Errore nell'apertura del file");
                }
                fclose(FileIn);

        }
}