Problemas con TStringsList

[pepecharlie67]

¿Porque me da un error en tiempo de ejecucion aqui?

Código Delphi [-]
            ATextFile := TStringList.Create;
            try
            ATextFile.LoadFromFile(ArchivoAdj.Text);
            ATextFile.Insert(0, 'aaaaa');
            ATextFile.SaveToFile(ArchivoAdj.Text);
            finally
            end;
            ATextFile.Free;

Gracias

[Neftali [Germán.Estévez]]

NOTA: La etiqueta de [ delphi ] al cerrar debe llevar la barra /

El Free, debería ir dentro del try (aunque eso no es razón para que falle).

¿Qué error te da? Eso ayudaría.

[roman]

Empezado por pepecharlie67

¿Porque me da un error en tiempo de ejecucion aqui?

Cuando nos digas qué error te da y en qué línea, quizá podamos ayudarte.

// Saludos

[pepecharlie67]

Gracias a todos por sus respuestas y su tiempo.Finalmente se soluciono el error solo.No se el porque,jaja.Supongo por no construir.Gracias