Problema al mostrar un registro en un label

[rufo]

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