Problema Lectura de caracteres en String

[gersojn]

Hola, tengo un problema, estoy construyendo una aplicacion, en la cual, cargo un archivo a un Tmemo mediante un Dialogo.

Memo1->Lines->LoadFromFile(Open->FileName);

El problema radica, en que ademas de el contenido del archivo, tengo que almacenar en una variable el nombre del archivo. El Dialogo, me retorna la direccion completa del archivo, Ej: C:\carpeta\archivo.txt

Lo que se me ha ocurrido es leer caracter por caracter, de ese String, y por ejemplo leer ya sea desde .txt hacia atras, o desde C: hacia adelante, y detectar los "\ ", de esa manera ubicar en donde esta "archivo.txt". Inicialmente hize esto:

String nombre_archivo;
nombre_archivo = Open->FileName;

// con la funcion Lenght() determino el numero de caracteres
nombre_archivo.Lenght()

Ahora como puedo recorrer ese String caracter por caracter?
O si alguien tiene otra forma de obtener el nombre del archivo, les agradeceria mucho.

De antemano muchas gracias por las repuestas..

[ecfisa]

Hola gersojn.

Podés usar la función ExtractFileName:

...
AnsiString Nombre;
 if (OpenDialog1->Execute())
  Nombre = ExtractFileName(OpenDialog1->FileName);
...

Saludos.

[ecfisa]

Y si deseas sólo el nombre, sin la extensión:

AnsiString Nombre;
 if (OpenDialog1->Execute())
  Nombre = ExtractFileName(OpenDialog1->FileName).SubString(1,
    ExtractFileName(OpenDialog1->FileName).Length() -
    ExtractFileExt(OpenDialog1->FileName).Length());

Saludos.

[gersojn]

Muchas gracias por las respuestas, me han sacado de un gran apuro