![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#4
|
|||
|
|||
|
Hola Marcos , ya lo he probado pero no me funciona .
he encontrado otra forma de crear un alias y funciona pero el problema es que una vez creado el alias necesito poder modificar el alias creado . Para Modificar el alias he encontrado una funcion que se encarga de eso mismo utilizando Tsession. te pongo el codigo por si te sirve : Procedure TfrMtoEmp.CambiarAlias; var slParametros : TstringList; begin Dir := Parametros.enviarBasedatos;//Funcion que devuelve //el Directorio if not Session.IsAlias ('Ajp') then Session.addStandardAlias('Prueba', Dir, 'Paradox') else begin slParametros := TStringList.Create; slParametros.Clear; slParametros.Add('PATH=' + Dir); Session.ModifyAlias('Ajp', slParametros); Session.SaveConfigFile; slParametros.Free; end; end; EL PROBLEMA ES QUE AHORA ME DA PROBLEMAS EL TSTRINGLIST NO ME DEJA AÑADIR LINEAS SABES POR QUE PUEDE SER UN SALUDO. |
|
|
|