Validación datos en datawindow
No se si estoy haciendo lo correcto ya que es la primera vez que participo en esta web.
Mi duda es la siguiente. Tengo un campo en un datawindow que "año". Corresponde a la películas y en este campo se debe poner el año de la película. Es un campo obligatorio, de 4 dígitos. Me gustaría que la persona que ponga el año este obligado a poner un año > 1900 y < 2010. En el caso de que ponga un año inferior o superior menos de dígitos le avise y que no se mueva de ese campo hasta que ponga el año correcto.
Mi duda es la siguiente. Tengo un campo en un datawindow que "año". Corresponde a la películas y en este campo se debe poner el año de la película. Es un campo obligatorio, de 4 dígitos. Me gustaría que la persona que ponga el año este obligado a poner un año > 1900 y < 2010. En el caso de que ponga un año inferior o superior menos de dígitos le avise y que no se mueva de ese campo hasta que ponga el año correcto.
1 Respuesta
Respuesta de achafio
1
Cambia el estilo del campo a Editmask, eso lo podrás encontrar en la pestaña Edit y en la sección Syle Type, luego en Mask pon 0000, eso le indicará que deberá poner obligatoriamente 4 campos, ahora si pone un valor inferior, deberás hacer lo siguiente:
En el evento editchanged del dw, escribe:
if getcolumnname() = 'anno' then
if long(data) < 1900 or long(data) > 2010 then
Messagebox("Error","Año ingresado fuera de rango")
SelectText(row, len(data))
end if
end if
Cualquier duda solo pregunta
En el evento editchanged del dw, escribe:
if getcolumnname() = 'anno' then
if long(data) < 1900 or long(data) > 2010 then
Messagebox("Error","Año ingresado fuera de rango")
SelectText(row, len(data))
end if
end if
Cualquier duda solo pregunta
