FoxPro/Visual FoxPro - Problema con checkbox

Hola Amigos del foro, tengo un problema con un checkbox que no me esta funcionando como quiero. El tema es asi, tengo un form donde cargo varios datos y tengo un checkbox que lo utilizo para saber si una venta afecta la cuenta del cliente o no ¿me explico?
Entonces lo puedo tildar o no depende de la situacion del cliente, y el codigo que uso es este

select clientes
if thisform.check1.value = 1
append blank
replace codigo with thisform.txtcodigo.value
replace nombre with thisform.txtnombre.value
etc
etc

ELSE
endif

O sea si el valor es 1 o sea tildado que me agregue un registro a la tabla clientes y sino que no haga nada, pero resulta que siempre me lo agrega este o no tildado, es como que no lee el check1 ¿me entienden?

Muchas gracias por su ayuda

Pablo - Argentina

Pablo, sucede que el checkbox es logico, lo estas tratando como numerico.
*
* estas sentencia tambien son validas:
if thisform.check1.value && aca pregunta si esta tidado
*
if NOTthisform.check1.value && aca pregunta no esta tidado
*
*
Prueba de esta manera:
**************************
select clientes
if thisform.check1.value = 'T' && Tildado
append blank
replace codigo with thisform.txtcodigo.value
replace nombre with thisform.txtnombre.value
etc
etc

ELSE
endif

El uso de value = 1 tambien es valido ya que uno significa verdadero como el trinity de mysql.

el error no esta en la validacion del checkbox seguramente es otro el problema. tal vez en el metodo que valida o llama al checkbox

pero el problema no es el chechkbox.

Revisa mas a fondo tu codigo pero ahi no hay problema