[[seoane]]

Utiliza esto:

Código Delphi [-]
NombreDelFichero:= InludeTrailingPathDelimiter(ExtractFilePath(ParamStr(0))) + 'Fichero.Log';