Yo solo haria el siguiente cambio:
Código:
With MetusaDataBase do
begin //Tdatabase Params.Clear;
Params.Add('PATH='+'F:\Aspelnew\sae30\S-METUSA');
Params.Add('DEFAULT DRIVER=PARADOX');
Params.Add('ENABLE BCD=FALSE');
DatabaseName:='Nombre_Sistema_X.X';
Connected := true;
End;
SQLquery.sessionName:=Metusa; // la session creada
SQLquery.databasename:=MetusaDataBase.DataBaseName;
Feliz año nuevo a todos...
Christian
Concepcion-Chile