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
Cita:
procedure TForm2.Button1Click(Sender: TObject);
begin
ChDir('C:\');
end;
|
Cita:
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.