[__cadetill]

Empezado por roman

Totalmente cierto Marcos, a mí se me había pasado lo del nombre del archivo. La duda es sí es necesario ExpandFileName o basta ExtractFilePath.

// Saludos

Según lo mostrado por Marcos, con ExtractFilePath sería suficiente