Deshabilitar Items de un PopUp

[[Al González]]

Si CheckIn1, AgregarMovimiento1... son los elementos TMenuItem, tan sólo tienes que cambiar su propiedad Enabled según corresponda.

Código Delphi [-]
If CampoEstado = ... Then
Begin
  CheckIn1.Enabled := True;
  ...
End
Else
Begin
  CheckIn1.Enabled := False;
  ...
End;

Si tienes navegación en el conjunto de datos, el evento apropiado para hacer esto podría ser OnDataChange del objeto TDataSource.

Espero te sirva.

Saludos.

Al González.