Pagando o Path de onde está o executável do Projeto

Delphi

25/09/2003

E ai pessoal, tudo joia ?

Alguém saberia me dizer como faço para pegar, em tempo de execução, o patch de onde está o arquivo executável do projeto que está rodando ?


Obrigado !!

Marcelo.


Marknet

Marknet

Curtidas 0

Respostas

Wagnerps

Wagnerps

25/09/2003

p_PathSistema := ExtractFileDir(Application.ExeName) + ´\´;


[b:fa0e5c6f50]p_PathSistema[/b:fa0e5c6f50] é uma variavel String;

Espero ter ajudado


GOSTEI 0
Delphiz

Delphiz

25/09/2003

Este é melhor do que o código acima.

ParamStr(0);


GOSTEI 0
POSTAR