Obtener el directorio padre de una ruta

[diego11]

Buenas, llevo toda la tarde buscando por el foro algo que me pudiera servir, y no he encontrado nada (o no lo he hecho bien para que funcionara ), que me haya servido para solucionar mi problema.
Os cuento:
Necesito algún método o función que dada una ruta, te devuelva la ruta padre de ésta, me explico:
Por ejemplo-> Tengo esta ruta C:\Carpeta\Subcarpeta y necesito algo que me devuelva C:\Carpeta

Un saludo y gracias anticipadas

[dec]

Hola,

Según Zarko Gajic esto podría servir:

Código Delphi [-]
//returns the parent directory for the
//provided "path" (file or directory)
function GetParentDirectory(path : string) : string;
begin
  result := ExpandFileName(path + '\..')
end;

Y la verdad es que es curioso. Lo explica el propio Zarko Gajic, claro.

[[Al González]]

¡Hola!

Código Delphi [-]
SubRuta := ExtractFileDir (Ruta);

Saludos.

Al González.

[diego11]

Empezado por dec

Hola,

Según Zarko Gajic esto podría servir:

Código Delphi [-]//returns the parent directory for the
//provided "path" (file or directory)
function GetParentDirectory(path : string) : string;
begin result := ExpandFileName(path + '\..')
end;


Y la verdad es que es curioso. Lo explica el propio Zarko Gajic, claro.

Desconocía esta página y tiene muy buena pinta.

Muchas gracias dec y Al González por vuestras soluciones, las dos me han servido.

Un saludo

[dec]

Hola,

Tiene artículos muy interesantes la página en que escribe Zarko Gajic, además, es un tipo muy amable: una vez le escribí para felicitarle y me respondió dándome las gracias y toda la pesca. Muy majo.

A lo mejor por esto es por lo que remito a esa página cuando veo la ocasión, pero, qué leches, es que además te la encuentras muchas veces cuando estás buscando información para esto o lo otro: como ahora, sin ir más lejos. Está muy bien, realmente.