Asignar TField a TDBLookupList en T.ejecución

[[coso]]

Hola, yo simplificaria todo a un unico datamodule (para eso esta este tipo de form, para no tener desperdigados todos los componentes de base de datos). Es probable que haya algun lio por alli (forms con el mismo nombre y diferentes componentes, por ejemplo, cosas asi) Por otra banda, si te da un error de read address, lo mas probable es que no este asignado o bien datamodule (que no este creado en tiempo de ejecucion) o bien que hayas liberado el ibQuery. Prueba if not assigned(Datamodule) then ShowMessage(''). Creo que debe ser eso, que no tienes creada la form Datamodule al llegar a este punto. Saludos.

[Bauhaus1975]

Hola de nuevo, he probado lo que me dices y nada.
Parece que todo está bien asignado, además todos los objetos (datasource, query) accedo sin problemas en tiempo de ejecución. El error ocurre al llamar a esa sentencia 'Assign', así que seguiré investigando.
Gracias.

[[coso]]

Hola, no es assign() es assigned(). La primera copia dos objetos. La segunda comprueba que el argumento pasado como puntero no sea null. Saludos.

[Bauhaus1975]

Hola, me refería a la linea:
form1.TJvDBLookupList.Field.Assign(prueba);
Que es donde salta la excepción...

[[coso]]

¿Son de los mismos tipos?¿o Fields es TFieldList? Si se puede acceder a Field de manera array (Field[0]) entonces son distintos tipos. De todas maneras, prueba con una asignacion directa (form1.TJvDBLookupList.Field = prueba) y comprueba antes si prueba no es null (if prueba = nil then showmessage(''))

[Bauhaus1975]

Son TField.
La sentencia form1.TJvDBLookupList.Field = prueba; no puede ejecutarse porque '.Field' es de sólo lectura...

[[coso]]

Si es de solo lectura...tampoco le tendrias que poder hacer un assign en teoria. De todas maneras, has comprobado que prueba no sea nil antes del assign? ¿Y para que sirve la propiedad .Field? si es de solo lectura, probablemente sera por algun motivo.