Desesperacion DBLookupComboBox

[Rockin]

Hola amigos, estoy apunto de suicidarme. Estoy intentando llenar un DBLookupComboBox con el campo de una tabla firebird, lo intento de las dos siguientes maneras y nada.

-----------------------1 forma---------------------------------------
datDatos.FIBDataSetLegislator.Active:= False;
datDatos.FIBQueryLegislator.SQL.Text:=('select ley from legislacion order by ley asc');
datDatos.FIBDataSetLegislator.Active:= True;
datDatos.FIBQueryLegislator.ExecQuery;
DBLookupComboBox1.ListSource:= datDatos.DataSourceLegislator;
DBLookupComboBox1.ListField:='ley';
--------------------------2 forma-------------------------------------
datDatos.FIBDataSetLegislator.Active:= False;
datDatos.FIBDataSetLegislator.SelectSQL.Text:=('select ley from legislacion order by ley asc');
datDatos.FIBDataSetLegislator.Active:= True;
DBLookupComboBox1.ListSource:= datDatos.DataSourceLegislator;
DBLookupComboBox1.ListField:='ley';

Pero no hace nada, sin embargo la consulta en un DBDataGrid si me lo ejecuta. He buscado en todos los hilos y nada de nada.
Quien pueda decirme algo, se lo agredecría, estoy apunto de suicirdarme.

Saludos y gracias