These two event procedures cause the display colors to change as Reflection enters and exits block mode. The BlockModeEnter event procedure changes the colors for plain text to white text on a blue ground. The BlockModeExit event procedure restores the default color configuration.

Private Sub Session_BlockModeEnter()

 Session.SetColorMap rcPlainAttribute, rcWhite, rcBlue

End Sub

Private Sub Session_BlockModeExit()

 Session.RestoreDefaults rcColors

End Sub