- setCaption(PACKAGE_NAME);
- setBackgroundColor(white);
-
- bar = new QMenuBar(this);
- bar->setFont(f);
- p = new QPopupMenu();
- p->setFont(f2);
- p->insertItem("Execute", this, SLOT(Run_Prog()));
- p->insertItem("Kill", this, SLOT(KillInterpreter()));
- prid = bar->insertItem("&Program", p);
- p1 = new QPopupMenu();
- p1->insertItem("Message", this, SLOT(MessageToNode()));
- p1->insertSeparator();
- p1->insertItem("Connect", this, SLOT(Connect()));
- p1->insertItem("Disconnect", this, SLOT(Disconnect()));
- p1->insertItem("Info", this, SLOT(Info()));
- p1->setFont(f);
- mid = bar->insertItem("&Machine", p1);
-
- p2 = new QPopupMenu();
- cwid = p2->insertItem("Editor", this, SLOT(Edit()));
- hid = p2->insertItem("Help", this, SLOT(Help()));
- p2->insertSeparator();
- optid = p2->insertItem("Options", this, SLOT(SetOptions()));
- msgid = p2->insertItem("Info messages", this, SLOT(SetMessages()));
- p2->setItemChecked(msgid, TRUE);
- p2->insertSeparator();
- lockid = p2->insertItem("Lock console", this, SLOT(LockConsole()));
- unlockid = p2->insertItem("Unlock console", this,
+ setWindowTitle(PACKAGE_NAME);
+// setBackgroundColor(white);
+
+// bar = new QMenuBar(this);
+// bar->setFont(f);
+// p = new QPopupMenu();
+ QMenu * programMenu = NULL;
+// p->setFont(f2);
+ programMenu = menuBar()->addMenu("&Program");
+// prid = bar->insertItem("&Program", p);
+ programMenu->addAction("Execute", this, SLOT(Run_Prog()));
+ programMenu->addAction("Kill", this, SLOT(KillInterpreter()));
+
+
+// mid = bar->insertItem("&Machine", p1);
+ machineMenu = menuBar()->addMenu("&Machine");
+// p1 = new QPopupMenu();
+ machineMenu->addAction("Message", this, SLOT(MessageToNode()));
+ machineMenu->addSeparator();
+ machineMenu->addAction("Connect", this, SLOT(Connect()));
+ machineMenu->addAction("Disconnect", this, SLOT(Disconnect()));
+ machineMenu->addAction("Info", this, SLOT(Info()));
+// machineMenu->setFont(f);
+
+// toolsid = bar->insertItem("&Tools", p2);
+
+// p2 = new QPopupMenu();
+ toolsMenu = menuBar()->addMenu("&Tools");
+ cwid = toolsMenu->addAction("Editor", this, SLOT(Edit()));
+ hid = toolsMenu->addAction("Help", this, SLOT(Help()));
+ toolsMenu->addSeparator();
+ optid = toolsMenu->addAction("Options", this, SLOT(SetOptions()));
+ msgid = toolsMenu->addAction("Info messages", this, SLOT(SetMessages()));
+ msgid->setCheckable(TRUE);
+ msgid->setChecked(TRUE);
+// toolsMenu->setItemChecked(msgid, TRUE);
+ toolsMenu->addSeparator();
+ lockid = toolsMenu->addAction("Lock console", this, SLOT(LockConsole()));
+ unlockid = toolsMenu->addAction("Unlock console", this,