Esempio n. 1
0
void TCueSheetWindow::MenusBeginning()
{
	AdjustFileMenu();
	AdjustEditMenu();
	AdjustCueSheetMenu();
	AdjustCueMenu();
	AdjustStageMenu();
	AdjustWindowsMenu();
}
void __fastcall TEditorsStylesDemoDemoMainForm::cxTreeViewChange(
      TObject *Sender, TTreeNode *Node)
{
  String AControlClassName;
  if (Node)
  {
	if (Node->Parent)
	{
      AControlClassName = Node->Text;
      Node = Node->Parent;
    }
    TEditorsStylesDemoBaseFrame* AFrame = (TEditorsStylesDemoBaseFrame*)Node->Data;
    if (ActiveFrame)
      ActiveFrame->Flickering = false;
    if ((AFrame) && (AControlClassName != NULL))
      AFrame->FlickerControls(AControlClassName);
	if (ActiveFrame != AFrame)
	{
	  if ((ActiveFrame) && (AFrame))
	  {
        ActiveFrame->Visible = false;
        ActiveFrame->Parent = NULL;
      }
      ActiveFrame = AFrame;
      ActiveFrame->Parent = cxGroupBox;
      ActiveFrame->Visible = true;
	  UpdateCurrentHintStyle(ActiveFrame->HintStyle, DefaultHintStyle);
	  AdjustFrameDisplayStyle(ActiveFrame, DefaultDisplayStyle);
	  AdjustFileMenu();
	  AdjustNotePane(AFrame);
	  PageControl->ActivePage = PageControl->Pages[Node->Index];
	  AdjustFileNameStatusPanel();
	  miStyle->Visible = AFrame->StyleMenuVisible();
	}
  }
}