Obtener direccion , ruta completa de mi programa

[[Lepe]]

quizás otro más intuitivo: Application.Exename

Saludos

[[seoane]]

Empezado por Lepe

quizás otro más intuitivo: Application.Exename

Tenemos funciones para todo, para cuando la función "mata_a_flanders"

Código Delphi [-]
TApplication = class(TComponent)
  private 
     ...    
    function GetExeName: string;    
     ...
  public
     ...    
    property ExeName: string read GetExeName;

function TApplication.GetExeName: string;
begin
  Result := ParamStr(0);
end;

[Kenobi]

Yo hasta ahora para saber la ruta de mi aplicacion, pues uso

Getcurrentdir();

y hasta ahora todo bien.....

[Peterman]

No veas...como se me quedó solucionado el tema no he vuelto a leer el hilo hasta ahora y he visto lo mucho que os lo habeis currao.

Me gustan las funciones que funcionen; y que la gente, tambien funcione.

Gracias a todos ustedes.