Ver Mensaje Individual
  #5  
Antiguo 23-09-2004
Avatar de Cabanyaler
Cabanyaler Cabanyaler is offline
Miembro
 
Registrado: jun 2003
Ubicación: País Valencià
Posts: 339
Reputación: 24
Cabanyaler Va por buen camino
Hola, yo utilizo esta función:

Código Delphi [-]
// Deja el alias apuntando al directorio 
procedure TFPrincipal.ReestableceAlias();
var
    AParams: TStringList;       // Para el retorno de los parametros de sesion
    Dir: string;                // Para almacenar la ruta fisica del alias
begin
    AParams := TStringList.Create;
    Dir := 'M:\Ruta\datos';
    // Actualizo los parametros del alias a como debe estar originalmente
    AParams.Clear;                            // Limpio el stringlist
    AParams.Add('PATH=' + Dir);               // Guardo en la var. el path + la ruta capturada
    DModule.Session.ModifyAlias('NombreAlias',AParams); // Modifico el path del alias
    DModule.Session.SaveConfigFile;                 // Guardo de forma permanente al BDE
end;
__________________
El meu país és tan petit, que des de dalt d'un campanar es pot veure el campanar veí.

Última edición por Cabanyaler fecha: 24-09-2004 a las 10:25:12.
Responder Con Cita