como Pegar o caminho da pasta

Delphi

27/12/2004

para pegar o caminho do arquivo fiz assim
if opendialo1.execute then
Edit1.Text := Opendialog1.FileName;
ficou assim c:\pasta\arquivo.txt

como faço para pegar o caminho da pasta e ficar somente
c:\pasta\

valeu galera!!!


Luiz_aquino

Luiz_aquino

Curtidas 0

Respostas

Massuda

Massuda

27/12/2004

Use a função ExtractFilePath da unit SysUtils.


GOSTEI 0
Luiz_aquino

Luiz_aquino

27/12/2004

Não consegui executar essa função
eu gostaria é de selecionar a pasta onde sera extraido o arquivo do disquete q está zipado, sabe como eu faço isso, quando eu selecionar as pasta mostre em um edite o caminho como o opendialog tem como vc mostrar o codigo de um exemplo se der pra fazer como vc mando fazer?

valeu!!!


GOSTEI 0
Bruno_fantin

Bruno_fantin

27/12/2004

if opendialo1.execute then
Edit1.Text := ExtractFilePath(Opendialog1.FileName);


GOSTEI 0
POSTAR