Cita:
Empezado por Casimiro Notevi
Código Delphi [-]
While not (query1.Eof) Do
Begin
if cod_barra.text=query1.fieldvalues['cod_barra'] then
begin showmessage('el codigo ingresado ya existe');
cod_barra.setfocus;
end;
query1.Next
end else
guardar.click;
end;
¿y ese código de dónde viene? |
el
end else es del while... corre bien el bucle, encuentra si ya existe el codigo, pero si no existe tiene que
guardar, es por eso que quiero poner un else al while...