Ver Mensaje Individual
  #2  
Antiguo 20-08-2007
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Reputación: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Aunque no es exactamente lo que preguntas, podrías comenzar el código de ese botón preguntando por el estado del dataset:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  if not (ADOTable1.State in dsEditModes) then
  begin
  {
    Aquí tu código
  }
  end;
end;

De esta manera te aseguras de no abrir esa ventana si el dataset está en edición o inserción.

Más allá de eso, si usas un ActionList para las acciones de tus botones, puedes usar su evento OnUpdate para ese tipo de cosas:

Código Delphi [-]
Action1.Enabled := not (ADOTAble1.State in dsEditModes);

// Saludos
Responder Con Cita