Buenas tardes necesito de su valiosa colaboracion, resulta que tengo una consulta en un combobox ya que al traer informacion de una consulta y llenar el combobox nop quiere mostrar informacion adicional a un label entonces quiero ver cual es mi error o que me falta, les pongo el codigo de mi consulta y de antemano gracias por su apoyo.
Código Delphi
[-]
procedure Tprincipal2.ComboBox7Exit(Sender: TObject);
begin
with dm1.Q_cfacturas do
begin
active:=false;
sql.clear;
sql.add('select id_cuenta from Cfacturas');
sql.Add('where cuenta = '+#39+combobox7.text+#39);
active:=true;
first;
if recordcount<>0 then
V_idcuenta:=fieldbyname('id_cuenta').asinteger
label114.Caption:=fieldbyname('numerocta').asstring;
end;
end;
Tambien les anexo la imagen de mi consulta