TIBquery y campos persistentes en tiempo de ejecucion

[[maeyanes]]

Hola...

Leyendo mejor tu duda, veo que estás haciendo mal algunas cosas. Primero, veo que destruyes el objeto ibquery2 y creas un nuevo objeto y lo asignas a la variable ibquery al cual le pones como nombre 'ibquery2'. Esto no significa que automáticamente los campos persistentes van a reconocer el nuevo objeto como padre. Y todo esto sin contar con el detalle de los tipos de campos.

Para lograr lo que deseas, podrías hacer algo como:

Código Delphi [-]
begin
  ibquery2.Close;
  // Asignas los objetos de base de datos y transacción de acuerdo al checkbox
  if radiobutton3.checked then
  begin
    ibquery2.Database:=    mainform.DB_empresa_server;
    ibquery2.Transaction:= mainform.TR_empresa_server
  end
  else
  begin
    ibquery2.Database:=    mainform.DB_empresa_local;
    ibquery2.Transaction:= mainform.TR_empresa_local
  end;
  // Aquí podrías crear la nueva consulta o asignar parámetros.
  ibquery2.Open
end

Si las tablas son exactamente iguales en ambas bases de datos, no deberías tener problemas. Ahora, esto nunca lo he hecho así y el código que te pongo no lo he probado.


Saludos...