Establecer rutas relativas a archivos

[Paoti]

Hola Tica.....


prueba hacer esto

var
ruta : string;
begin
ruta := ExtractFileDir(Application.ExeName) + '\' + 'archivo.txt';
eti.Caption := 'Se Creará el Archivo en... ' + Ruta;
end;

la funcion extractfiledir te devuelve la ruta donde esta tu aplicacion.... no importe donde este instalada....


espero te sirva

[xomen]

Empezado por Paoti

Hola Tica.....


prueba hacer esto

var
ruta : string;
begin
ruta := ExtractFileDir(Application.ExeName) + '\' + 'archivo.txt';
eti.Caption := 'Se Creará el Archivo en... ' + Ruta;
end;

la funcion extractfiledir te devuelve la ruta donde esta tu aplicacion.... no importe donde este instalada....


espero te sirva

Gracias me sirvió de mucho...