Combinar Dos Dblookupcombobox

[donpedro]

HOla, mira lo que tuve que hacer.........

en el evento Onclick del Dblookupcombobox correspondietne a SERVICIOS coloque el siguiente codigo

Código Delphi [-]
edit1.Text:=inttostr(fmodulo.T_Servicios.FieldByName('servicios_id').AsInteger);

with fmodulo do
begin
q_generico.close;
q_generico.SQL.Clear;
q_generico.SQL.Add('select * from grados where servicios_id='+edit1.Text +'');
q_generico.Open;



end;

Le paso al edit1 el id de servicios que selecciono, luego con la consulta comparo el id de servicio de la tabla GRADOS con el numero que esta en el edit1. y asi me funciona..............un poco truqueao...que creen