Ver Mensaje Individual
  #2  
Antiguo 14-02-2013
Avatar de Al González
[Al González] Al González is offline
In .pas since 1991
 
Registrado: may 2003
Posts: 5.614
Reputación: 32
Al González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en bruto
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.
__________________
Tras casi seis años de trabajar para una empresa alemana como desarrollador Delphi, se vieron forzados a dejarme ir (temas presupuestales). Así que ahora estoy abierto a escuchar nuevas ofertas.
Responder Con Cita