Asignar TField a TDBLookupList en T.ejecución

[[coso]]

Hola, antes que nada, si findfield te devuelve un objeto tipo TField, no deberias crear prueba antes, pues el findfield sobreescribira el recien creado. De igual manera, si ahora mismo hicieses un prueba.free, estarias liberando DataModule.ibQuery.FindField('TIPO'). Es raro que te salte una excepción, pues si TIPO existe te tendria que devolver nil. Es posible que ibQuery no este asignado antes de hacer el findfield? prueba de hacer:

Código Delphi [-]
var
prueba : TField;
begin
if not Assigned(DataModule.ibQuery) then ShowMessage('');
prueba := DataModule.ibQuery.FindField('TIPO');
form1.TJvDBLookupList.Field.Assign(prueba);

si nos indicas cual es el mensaje de la excepción, quiza te podamos ayudar mejor. saludos.