Foros Club Delphi - NO ENTRA -> if Enum.Text = adoquery1.FieldByName('numero').AsString then

hola que tal

no eh podido hayar el problema por que no me entra a un if.

esta es la cuestion

hise esta pequeña consulta con el componete zeos

Código:

 if key = 13 then

           begin

                   zquery1.SQL.Clear;

                   zquery1.SQL.Add('select * from clientes where numero='+quotedstr(enum.Text)+'');

                   zquery1.Active:=true;

                   if enum.Text = zquery1.FieldByName('numero').AsString then

                   begin

                            enom.Text := zquery1.FieldByName('nombre').AsString;

                            EDir.text:=zquery1.fieldbyname('direccion').asstring;

                            bcancelar.SetFocus;

                            beliminar.Enabled:=true;

                            bmodificar.Enabled:=true;

                   end

                   else

                   begin

                            enom.SetFocus;

                            bguardar.Enabled:=true;

                   end;

          end;

todo sale bien

ahora lo hise con el ADO

que quedo asi:

Código:

 if key = 13 then

           begin

                    adoquery1.SQL.Clear;

                   adoquery1.SQL.Add('select * from clientes where numero='+quotedstr(enum.Text)+'');

                   adoquery1.Active:=true;

                   if Enum.Text = adoquery1.FieldByName('numero').AsString then

                   begin

                            enom.Text := adoquery1.FieldByName('nombre').AsString;

                            EDir.text:=adoquery1.fieldbyname('direccion').asstring;

                            bcancelar.SetFocus;

                            beliminar.Enabled:=true;

                            bmodificar.Enabled:=true;

                   end

                   else

                   begin

                            enom.SetFocus;

                            bguardar.Enabled:=true;

                   end;

todo se ve bien

pero no entra en el if sem ehase muy rarro

Código:

if Enum.Text = adoquery1.FieldByName('numero').AsString then

bueno

cual quier ayuda se los agradeseria mucho

saludos