FoxPro/Visual FoxPro - nose como validar un boton

Hola buenos dias

Tengo un formulario el cual contiene un botón de modificar, pero ese boton tiene un mensaje " la modificación se ha realizado con exito" que se activa al momento de precionarlo, aún sin que se haya modificado algun campo en el mismo.

Lo que quiero saber es de que manera puedo obligar al boton a que si no he hecho ninguna modificación en el formulario me de otro mensaje que me diga "usted no ha hecho ninguna modificación en este formulario", o de lo contrario guarde con exito.! Agradezco la ayuda

Tienes dos formas básicas, que dependen un poco del formulario:

1) Por Interfaz: Capturando el Evento InteractiveChange de cada objeto que pueda modificarse con una propiedad tipo Flag. Esto tiene el defecto de que no analiza el contenido. Si el usuario volvió al estado anterior, marcará un cambio cuando en realidad no lo hubo.

2) Por contenido: Creando una propiedad Array del formulario con dos columnas: 1) referencia de objeto, 2) Valor del objeto
Luego en tu botón de Aceptar, analizas el array para cada fila: si la columna 2 coincide con el Value de cada objeto de la columna 1, no se ha efectuado ningún cambio.
Por ejemplo, supongamos que queremos controlar lo que sucede en un container "cnt_daper" que tiene 7 controles.
Creamos 2 métodos en el formulario ("Array_create" y "Array_Review"). Array_create es un método que se puede llamar después de rellenar los controles (modificación) o en el init del form (alta). Y Array_Review lo llamaremos en el botón de Aceptar.



En Array_Review, en lugar del Messagebox, irá la acción correspondiente.

lo pondre en práctica, muchas gracias

Lo mas facil que puedes hacer, es lo que hacia yo cuando desarrolle en visual Foxpro..... crea una libreria de clases y creas todos tus objetos, un textbox y le agregas una nueva propiedad, "modificado" de tipo booleano, yo incluso agregue una llamada "editable", y asi lo hice para las ffechas, los combobox, y los checkbox, etc. y tenia mi libreria de clases, en cada control en el evento changed algo asi ya no recuerdo, le ponia modificado = .t.

luego en el formulario en lugar de poner los controles que vienen ahi en la toolbar, arrastraba mi control personalizado y pues le asignas el campo, o desde el diseñador de tablas le pones que libreria usara y le asignas el control y cuando generas el formulario te pone tus controles personalizados..... ojo, tambien tenia un formulario personalizado el cual usaba siempre para mis pantallas..... en ese formulario tenia una funcion llamada modificado, y cuando precionaba el boton cerrar le decia if thisform.modificado() = .t. mensaje, hay datos no guardados, return................. y esa funcion lo que hacia era tener una variable llamada valor = .f. y luego hacia un for sobre thisform.controlcount y preguntaba if thisform.control[ contador ].modificado = .t. entonces valor = .t. y al final del for un return valor y asi si modificaba cualquier control, con esa funcion dsabia si se habia movido algo....

no te puedo enviar codigo porque no lo tengo a la mano