Modificar el path de un Alias de DBE en runtime

[[Lepe]]

Al cambiar de "empresa" tienes que cerrar la sesion, cerrar el TDatabase, modificar el path del alias, borrando y creando el alias (por ejemplo), por último, abres la sesion, Database y las tablas que necesites en el orden que he dicho

Tip: Al cerrar el TDatabase, se cierran todas las tablas y consultas abiertas en ese momento. Al abrir el Database NO se abre ninguna tabla ni consulta.

Saludos

[UltraMan]

Gracias Lepe por responder, solo uso tabla y datasource, nunca he trabajado con tdatabase, mi aplicacion no es multiusuario, es necesario usar el tdatabase?

[[Lepe]]

Tampoco usas un TSession, pero en tu código veo Session.IsAlias .

Cuando tú añades un TTable/TQuery, etc, delphi crea el TSession y TDatabase implicitamente, (si, de acuerdo, no tienes el componente TSession puesto en tu Datamodule o Form, pero por código puedes acceder a ellos).

En realidad estos dos componentes son los más importantes de tu conexión. De hecho, si pones en tu código "Database." el code insight de delphi te mostrará muchas rutinas interesantes.

Básicamente:

Código Delphi [-]
Database.Session.Active := false; 
// como ves, a través del Tdatabase se puede acceder al Session que tú utilizas .

Database.Connected := false; 
//cerramos la conexión y todas las tablas abiertas.

// cambias el alias, el código que usas ahora mismo.

Database.Session.Active := true;
Database.Connected := true;
AbrirTablas; // llamas a un procedimiento que abra las tablas que necesites

Saludos