TObjectState = (
  osEmpty,
  osLoaded,
  osRunning,
  osOpen,
  osInPlaceActive,
  osUIActive
);

enum TObjectState {
  osEmpty,
  osLoaded,
  osRunning,
  osOpen,
  osInPlaceActive,
  osUIActive
};