Paradox En Red Y Bde

[[Lepe]]

Realmente paradox en red es comparable a tener una carpeta compartida, donde el programa (en cada ordenador que actua como cliente) va a pillar la información de esa carpeta compartida. Tan simple como eso.

Si el ordenador donde estará la BBDD (que actua de servidor) también tendrá el programa tuyo funcionando, entonces deberás configurar el "Local Share"... pero eso es otra historia.

No es obligatorio que tengas un Datamodule con todas las tablas dentro, aunque si es aconsejable.

Tal y como lo tienes planteado, haz lo siguiente:
- Crea un Datamodule, allí pones el TSession y el TDatabase.
- Crea un archivo .ini donde se guarde como mínimo:

- NetFileDir = '\\MiServer\MisDatos\NET';
- PrivateDir = 'c:\Temp';
- DatabaseDir = '\\MiServer\MisDatos
- Alias = 'MiAlias'

Cuando se crea el Datamodule (evento OnCreate, por supuesto), lees del archivo .ini esas 3 variables y las asignas al TSession y al TDatabase, tal y como ha dicho egostar.

Además, deberías crear por código el alias, así no tendrás que usar el bde Administrator para crearlo después de instalar tu programa:

Código Delphi [-]
Datamodule.OnCreate:

var ElAlias, DatabaseDir:string // leídos desde el .ini
With MiSession do
begin
   if not IsAlias(ElAlias) then
   begin
      AddStandardAlias(ElAlias, DatabaseDir);
     SaveConfig; // guardar la configuración a disco para la proxima vez que se ejecute.
   end;
end;

Cuando creas una ventana, a cada TTable/TQuery que tengas, deberás asignarle en tiempo de ejecución:
- el TDadabase que tienes en el Datamodule,
- el alias que estes usando

Esto es así, porque ahora, mientras diseñas tu aplicación la Base de datos la tendrás en una ruta determinada, cuando la instales en otro ordenador, la ruta puede cambiar, y entonces dejará de funcionar todas las tablas que apunten al alias usado en diseño.

De la forma que te indico, solo tienes que cambiar el archivo .ini.

Saludos

[roman]

Empezado por Lepe

Cuando creas una ventana, a cada TTable/TQuery que tengas, deberás asignarle en tiempo de ejecución:
- el TDadabase que tienes en el Datamodule,
- el alias que estes usando

Esto no es necesario. En tiempo de diseño, se enlazan todas la componentes TQuery y TTable a las componentes TDatabase y TSesion y durante la ejecución sólo hay que cambiar el alias en TDatabase.

// Saludos

[[Lepe]]

Gracias por la puntualización... hace tiempo que no uso Paradox

Saludos

[NEOALEX00016]

gracias amigo ya eh hecho todo esto pero el database me da el siguiente error y no se me conecta simultaneamente en las don computadoras
el error es el siquiente que aparece cuando abro el programa

database1:cannot perform this operation on an open database
gracias por su respuesta

[[egostar]]

Seguramente tienes abierta la database en tiempo de diseño.

Salud OS.

[NEOALEX00016]

miren lo que hice en un data module coji y puse un database y un tsession le puse las indicacion corespondiente le puse donde estaba el netdir y ley todo

en el tsession la active le puse la indicacion que le pusiera el nombre automatica mente me pone en el nombre session1_1 entonce a todas las tablas que tengo en la aplicacion la combino con el database en ves del alias y luego en el la session le pongo la session1_1 pero a hora me aparece que el nombre de la session es invalido


lo que quiero por favor es que me digan como configurar el database y el tsession y cada tabla de mi aplicacion para que me funcione en red
y si tengo que activarl el database y el tsession en diseño y si tengo que desctivar las tablas en tiempo de diseño

o si hay un paso mas rapido gracios para configurar las tablas y

gracias por su ayuda

[NEOALEX00016]

y aparte de eso hice esto

DataModule1.OnCreate;
Begin
With MiSesion do begin
NetFileDir := '\\MiServer\MisDatos\NET';
PrivateDir := 'c:\Temp';
End;
With MiDataBase do begin
Params.Clear;
Params.Add('PATH='+'\\MiServer\MisDatos');
Params.Add('DEFAULT DRIVER=PARADOX');
Params.Add('ENABLE BCD=FALSE');
Connected := true;
End;
End;

gracias por su ayuda