Manejar mas de una conexion con Paradox

[[Lepe]]

Empezado por egostar

Si se ejecuta el programa en el mismo servidor uso esto:

El servidor tambien debe usar rutas de red, en caso contrario puedes obtener fallos de indices al entrar simultaneamente con el "servidor" y "clientes"


Para el alias, puedes hacerlo en tiempo de ejecución tranquilamente:

Código Delphi [-]
with session do
begin
  if not isAlias('mialias') then
    AddStandardAlias ('Mialias',rutabasedatos,'Paradox' );
  config := cmAll;
  SaveConfig; // guardar de forma persistente el alias. 
// equivale a guardarlo desde el  Bde Administrator
end;

.

Una vez creado el alias, debes asignarselo a todas las tablas y querys que tengas, si le has cambiado el nombre, pues debes actualizarlo:

Código Delphi [-]
  DtbPPal.Session.Open;
  DtbPPal.Connected := True;

    for i := 0 to pred(ComponentCount) do
      if (components[i] is TTable) then
        TTable(components[i]).DatabaseName := Alias
      else if (components[i] is TQuery) then
        TQuery(components[i]).DatabaseName :=Alias;

Yo al menos lo he hecho así, puede que haya otras formas...nu sé.

Saludos