Que evento debo capturar?

Alfredo · #1 30-03-2005

Ok. Otra vez clipper....

Pues en aquellos tiempos usaba una funcion que me daba verdadero si se actualizaba un get en la pantalla: UPDATED()

Solo deseo activar el boton "Grabar" solo si el usuario "modifica" uno de los varios Tedit's. Ok se que puedo hacerlo en el OnExit de cada Tedit, pero creo que debe haber algo mas general,

Cual seria el evento que necesito capturar?

(a veces uno se tranca en unas cosas.....)

marcoszorrilla · #2 30-03-2005

Si utilizas DbEdits puedes colocar una variable pública de tipo lógico que haga de semáfooro:

Código Delphi [-] procedure TForm1.DataSource1DataChange(Sender: TObject; Field: TField);
 begin
 lCambios:=True;
 end;

Y luego en el botón que tengas para grabar consultas como quedó el valor de dicha variable para saber si se hicieron cambios.

Un Saludo.

marcoszorrilla · #3 30-03-2005

Con TEdits puedes hacer algo parecido programas el evento OnChange de un Tedit y luego asocias todos los demas tedits a este evento.

Un Saludo.

Pablo Carlos · #4 31-03-2005

Cita:

Empezado por Alfredo

Solo deseo activar el boton "Grabar" solo si el usuario "modifica" uno de los varios Tedit's. Ok se que puedo hacerlo en el OnExit de cada Tedit, pero creo que debe haber algo mas general,
Cual seria el evento que necesito capturar?
(a veces uno se tranca en unas cosas.....)

Quisiera agregar algo... si tienes el Boton_Grabar en Enabled := False y en el evento AfterEdit de la tabla pones Boton_Grabar.Enabled := True; y luego en el evento AfterPost de la misma tabla lo pasas a false
Este es mi aporte
Saludos bye

jachguate · #5 31-03-2005

No recuerdo haber leido que los datos en los edits estuvieran asociados a alguna tabla...

si fuese asi, lo mas natural sería el uso de DBEdits, ¿no?, y valerse de la propiedad Modified del DataSet para saber si se ha aplicado alguna modificación sobre los valores del registro activo

Hasta luego.

roman · #6 31-03-2005

Cita:

Empezado por jachguate

si fuese asi, lo mas natural sería el uso de DBEdits, ¿no?, y valerse de la propiedad Modified del DataSet para saber si se ha aplicado alguna modificación sobre los valores del registro activo

Concuerdo contigo en que la propiedad Modified nos permite prescindir del semáforo de Marcos. Pero el evento DataChange que él propone es muy bueno para poder habilitar en automático el botón en cuestión.

// Saludos

jachguate · #7 31-03-2005

oh, claro. El punto, es que no está claro (al menos para mi) el que haya un datasource de por medio...

saludos.

Alfredo · #8 31-03-2005

Pues les agradezco a todos...

Para agregar inf. En el form utilizo Tedits, un para de Tmemos y yn Tcombobox. Con un boton "Guardar" muevo los datos a la base de datos. Uso un datamodule con su respectivo Tquery y Tdatasource.

Me propuesta de Marco es en la que estaba pensando, solo que confundido en el evento. Pero vean que es interezante .... deberia haber un evento que capturara una modificacion de este tipo sin tener que recurria a banderas o tratamiento individual...(como la funcion que les comente de clipper) jeje... Bueno en todo caso tambien se puede crear no?.... cuando tenga un tiempito le buscare la vuelta, si la termino la publico.