Ver Mensaje Individual
  #1  
Antiguo 05-11-2019
tarco35 tarco35 is offline
Miembro
 
Registrado: sep 2003
Posts: 210
Reputación: 21
tarco35 Va por buen camino
Question Evento comun para tablas

Saludos.. tengo muchas tablas y lo que quiero es tener un evento comun para todas ellas en el evento AfterPost, de forma que todas realicen la misma accion, que es FlushBuffers.
Me explico, en el avento AfterPost de Tabla1 tener Tabla1.FlushBufers, en el de Tabla2 tener Tabla2.FlushBuffers,.....
pues en vez de tener que escribir todo esto
Código Delphi [-]
procedure TModuloDatos.Tabla1AfterPost(DataSet: TDataSet);
begin
  Tabla1.FlushBuffers;
end;

procedure TModuloDatos.Tabla2AfterPost(DataSet: TDataSet);
begin
  Tabla2.FlushBuffers;
end;

etc etc

poder tener un procedure que le pueda asignar a todos los eventos Afterpost y realice esta acción.
(Delphi6, Paradox)
Gracias.
Responder Con Cita