realmente es necesario especificar el path?

[cocute]

pues eso,
recuerdo hace años cuando programaba en versiones mas viejas de delphi y vb creo que habia que ponerlo porque si cambiabas de directorio la liabas.

se que el path del ejecutable se extrae muy facil con
ExtractFilePath(Application.ExeName);

pero realmente si yo quiero acceder a un fichero de texto o de lo que sea que esta en el directorio del ejecutable ¿debo especificar el path?

en definitiva es necesario esto?
MEMO1.Lines.LoadFromFile(ExtractFilePath(Application.ExeName)+'fichero.txt');

o basta con esto
MEMO1.Lines.LoadFromFile('fichero.txt');

se que en principio funciona de las dos formas, pero quiero saber si podria tener algun problema por no especificarlo.

gracias

[marcoszorrilla]

Para mi juicio da lo mismo una que otra, lo que creo no debe de hacerse es partir de un camino preestablecido, tal que C:\Programa\ porque si cambiamos el fichero de carpeta dejará de funcionar, en los dos métodos anteriores todo funcionará correctamente si el fichero se encuentra en la misma carpeta que el ejecutabe.

Otra opción puede ser configurar estos caminos mediante un fichero INI.

Un Saludo.

[neftali2]

La duda que tengo es si cuando lo pones sin path, está mirando en el directorio del ejecutable o en el que él considera que es el directorio actual.

[dec]

Hola,

Lo más seguro, en mi opinión, es incluir el "path", como tú dices. ¿Por qué? Pues porque, de otro modo (si no me equivoco) puede haber problemas si alguien ha cambiado el "directorio actual" y creo que es ahí donde se "mira" si no se especifica directorio alguno. ¿Que tú no lo cambias? Bueno, pero, puede que algún componente, o alguna "rutina" escondida por ahí sí lo haga.

De todas formas, no creo que sea problema incluir el "path"; si ves "repetitivo" escribir el mismo código tal vez podrías definir alguna constante o alguna variable "global" por ahí que te simplicase un poco el asunto. En definitiva, creo que lo de poner el "path" puede ser necesario, puesto que de la otra forma podemos encontrarnos con problemas en un momento dado. Tal vez no es muy probable, pero, ¿por qué no evitar estos posibles problemas si lo tenemos tan sencillo?

[[Lepe]]

Hasta donde sé, la cosa no ha cambiado.

Sin path, accedes al directorio activo de windows (que otro programa puede haberlo cambiado) así que no es fiable.

Cuando me he olvidado de poner el path, mi archivo termina en la carpeta de windows (la mayoría de las veces)

Lo más cómodo es crear una unidad con parte de inicialización, así podrías tener preestablecido dicha "constante" y reutilizarlo en proyectos (como ya imaginarás, no es bueno poner muchas cosas en inicialización porque quizás no las necesites todas)

Código Delphi [-]
unit base;

interface

uses ...

var ExePath :string;

implementation

initialization
ExePath := ExtractFilePath(Application.Exename);

end.

[cocute]

pensaba yo que era un tema que estaria claro, pero veo que estais igual que yo, osea de poner el path para asegurar,
quizas habria que hacer alguna prueba creando algun programa que cambie
el path y probarlo mientras tenemos nuestro programa en ejecucion.

Pero..... ¿como se cambia el path activo de windows para probar?

[dec]

Hola,

¿Dónde se creará el archivo "foo.txt"?

Código Delphi [-]
procedure TForm2.Button1Click(Sender: TObject);
var
  fs: TFileStream;
begin

  ChDir('C:\');

  fs := TFileStream.Create('foo.txt', fmCreate);

  fs.Free();

end;

En efecto, se creará en "C:\foo.txt". O sea que "ChDir()" establece el "directorio de trabajo" en "C:\" y, al no indicar luego una ruta absoluta, el archivo "foo.txt" se creará en "C:\foo.txt" y no en el directorio de nuestra aplicación, tal como podríamos esperar.

[cocute]

otra prueba que tambien es instructiva es crear dos programas, y ejecutarlos a la vez,
¿que ocurrirá entonces?
pues que si se crea el fichero en el directorio del ejecutable.
osea que un programa no le puede cambiar de path al otro

procedure TForm2.Button1Click(Sender: TObject);
begin
ChDir('C:\');
end;

procedure TForm2.Button1Click(Sender: TObject);
var fs: TFileStream;
begin fs := TFileStream.Create('foo.txt', fmCreate);
fs.Free();
end;

otra prueba que he hecho es poner un componente Topenfile ejecutarlo y cambiar ahi de directorio.
Pero con eso no se cambia el path.
En cambio si ponemos un compoente tipo Tdirectoryoutline y cambiamos de directorio, si que cambia el path activo.

En definitiva si no estamos seguros de que componentes vamos a usar mejor ponerlo para asegurar.
Aunque si controlamos los componentes que tenemos no haria falta realmente.