{Existem situações que necessitamos o caminho de um
determinado arquivo 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;