{ Existem casos em que apenas necessitamos do caminho onde um determinado arquivo se encontra sem o respectivo arquivo.
exemplo C:BackupMaio07ackup.gbk
resultado ficará C:BackupMaio07
espere que ajude, para mim foi util } //coloque o caminho em um edit (proveniente de um opendialog por exemplo)
var
nomearq: String; begin
nomearq:=ExtractFileName(Edit1.Text);
Edit1.text := Copy(Edit1.text,1,Length(Edit1.text)- Length(nomearq)); end;