Ver Mensaje Individual
  #3  
Antiguo 04-10-2006
rafita rafita is offline
Miembro
 
Registrado: ago 2003
Ubicación: Cuenca- España.
Posts: 309
Reputación: 21
rafita Va por buen camino
Hola, no se si te sé responder, pero te doy una idea: Pon las características de la conexión en el programa, así no tienes que definirlas en el BDE.
Código:
 if DataBase1.Connected then DataBase1.Connected:=False;
  DataBase1.Directory:=UbicacionBaseDatos;
  Database1.Params.Clear;
  Database1.Params.Append('SERVER NAME='+UbicacionBaseDatos);
  Database1.Params.Append('USER NAME=SYSDBA');
  Database1.Params.Append('OPEN MODE=READ/WRITE');
  Database1.Params.Append('SCHEMA CACHE SIZE=8');
  Database1.Params.Append('LANGDRIVER=');
  Database1.Params.Append('SQLQRYMODE=');
  Database1.Params.Append('SQLPASSTHRU MODE=SHARED AUTOCOMMIT');
  Database1.Params.Append('SCHEMA CACHE TIME=-1');
  Database1.Params.Append('MAX ROWS=-1');
  Database1.Params.Append('BATCH COUNT=200');
  Database1.Params.Append('ENABLE SCHEMA CACHE=FALSE');
  Database1.Params.Append('SCHEMA CACHE DIR=');
  Database1.Params.Append('ENABLE BCD=TRUE');
  Database1.Params.Append('BLOBS TO CACHE=200');
  Database1.Params.Append('BLOB SIZE=32');
  Database1.Params.Append('WAIT ON LOCKS=FALSE');
  Database1.Params.Append('COMMIT RETAIN=FALSE');
  Database1.Params.Append('ROLE NAME=');
  Database1.Params.Append('PASSWORD=miclave');
  DataBase1.DataBaseName:='Registro';
  DataBase1.Connected:=True;
__________________
Rafita.
Responder Con Cita