Ver Mensaje Individual
  #6  
Antiguo 12-05-2007
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Reputación: 10
marcoszorrilla Va por buen camino
El inconveniente de esta última propuesta es que si se trabaja en red se obtendrán no pocas corrupciones de índices ya que se aconseja separar el ejecutable de los datos por ejemplo.

C:\Alfa
C:\Alfa\Progs {Aquí estaría el/los ejecutables}
C:\Alfa\Datos{Aquí las tablas}
C:\Alfa\Net{Aquí PdoxUsrs.Net}
C:\Alfa\Temp


Por otra parte se puede incluir en el ejecutable una función que se encargue de crear el alias sino existiera:
Código Delphi [-]
Function Crear_Alias(NombreAlias:String;Nombredir:String):Boolean;
begin
If not session.IsAlias(NombreAlias) Then
   Begin
   Try
      Session.AddStandardAlias(NombreAlias,Nombredir,'PARADOX');
      Session.SaveConfigFile;
      Result:=True;
   except
      Application.MessageBox('Error Creando el alias','Atención',MB_OK);
      Exit;
      Result:=False
      End;
   end
   else
   begin
   Application.MessageBox('El alias ya existe.','Atención',MB_OK);
   Result:=False;
   end;
end;
Un Saludo.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita