Ver Mensaje Individual
  #3  
Antiguo 31-01-2006
Avatar de Jonnathan
Jonnathan Jonnathan is offline
Miembro
 
Registrado: may 2005
Ubicación: Isla de Margarita, Venezuela
Posts: 64
Reputación: 19
Jonnathan Va por buen camino
Hola jcheco, para añadir un poco mas al comentario de jmariano, yo lo que hago siempre para estos casos es dejar los datasets en el DataModule y pongo los DataSources en los formularios. En el evento OnStateChange pongo un código mas o menos asi:

Código Delphi [-]
procedure DataSource1StateChange(Sender: TObject);
begin
   Case TDataSource(Sender).State of
   dsInsert: begin
                   //AQUI PONGO MI CODIGO A EJECUTAR CUANDO SE  
                   //INSERTAN REGISTROS, COMO ACTIVAR BOTON DE GUARDAR Y DESACTIVAR BOTONES DE NAVEGACION y DESACTIVAR BOTON GUARDAR
             end;
   dsEdit:   begin
                    //AQUI PONGO MI CODIGO A EJECUTAR CUANDO SE 
                    //EDITAN REGISTROS, COMO ACTIVAR BOTON DE GUARDAR Y DESACTIVAR BOTONES DE NAVEGACION
             end;
   else
             begin
                    //AQUI PONGO EL CÓDIGO CUANDO SE ESTA 
                    //NAVEGANDO POR LOS REGISTROS, ACTIVAR BOTONES DE NAVEGACION
             end; 
  end; //end case
end;
__________________
"En el siglo de la estupidez todas las casas comienzan por la fachada" (Fuckowsky)
Planeta Insólito, La Pluma Inspirada
Responder Con Cita