Ver Mensaje Individual
  #3  
Antiguo 14-05-2010
cloayza cloayza is offline
Miembro
 
Registrado: may 2003
Ubicación: San Pedro de la Paz, Chile
Posts: 947
Reputación: 25
cloayza Tiene un aura espectacularcloayza Tiene un aura espectacular
Yo por lo general para realizar esas acciones utilizo el evento del TDatasource, onStateChange;


Código Delphi [-]
{
Los posibles valores de State son:

  TDataSetState = (dsInactive, dsBrowse, dsEdit, dsInsert, dsSetKey,
    dsCalcFields, dsFilter, dsNewValue, dsOldValue, dsCurValue, dsBlockRead,
    dsInternalCalc, dsOpening);

}
procedure TForm1.DataSource1StateChange(Sender: TObject);
begin
       Button1.Enabled:=Datasource1.State in [dsEdit,dsInsert];
       Button2.Enabled:=(DataSource1.State=dsEdit);
       Edit1.Enabled    := (DataSource1.State = dsBrowse);
end;
Saludos...
Responder Con Cita