1 // SUPERV SUPERVGUI : GUI for Supervisor component
3 // Copyright (C) 2003 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
6 // This library is free software; you can redistribute it and/or
7 // modify it under the terms of the GNU Lesser General Public
8 // License as published by the Free Software Foundation; either
9 // version 2.1 of the License.
11 // This library is distributed in the hope that it will be useful,
12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 // Lesser General Public License for more details.
16 // You should have received a copy of the GNU Lesser General Public
17 // License along with this library; if not, write to the Free Software
18 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 // See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org
24 // File : SUPERVGUI.cxx
25 // Author : Francis KLOSS
29 #include "SUPERVGUI.h"
31 #include "QAD_Resource.h"
32 #include "QAD_FileDlg.h"
33 #include "QAD_Application.h"
34 #include "QAD_StudyFrame.h"
35 #include "QAD_RightFrame.h"
36 #include "QAD_LeftFrame.h"
37 #include "QAD_ViewFrame.h"
38 #include "QAD_ObjectBrowser.h"
39 #include "QAD_ObjectBrowserItem.h"
40 #include "QAD_MessageBox.h"
42 #include "SALOME_Selection.h"
43 #include "SALOME_ListIteratorOfListIO.hxx"
44 #include "SALOME_InteractiveObject.hxx"
45 #include "SALOMEGUI_ImportOperation.h"
46 #include "SALOMEGUI_NameDlg.h"
47 #include "Utils_ORB_INIT.hxx"
49 #include CORBA_SERVER_HEADER(SALOMEDS_Attributes)
52 int SUPERVGUI::factory = 0;
53 SUPERVGUI Supervision("");
56 SUPERVGUI::SUPERVGUI(const QString& theName, QObject* theParent)
57 : SALOMEGUI( theName, theParent ),
63 Trace("SUPERVGUI::SUPERVGUI")
66 MESSAGE("SUPERVGUI Info : factory build");
68 MESSAGE("SUPERVGUI Error : another call to factory constructor");
72 SUPERVGUI::~SUPERVGUI() {
73 Trace("SUPERVGUI::~SUPERVGUI")
76 //if (!engine->_is_nil()) CORBA::release(engine);
79 if (browser->isVisible())
83 MESSAGE("SUPERVGUI Info : factory destroy");
85 MESSAGE("SUPERVGUI Error : another call to factory destructor");
89 void SUPERVGUI::init(QAD_Desktop* parent) {
90 Trace("SUPERVGUI::init")
93 study = desktop->getActiveStudy();
94 SALOME_NamingService* namingService = desktop->getNameService();
95 loadEngine(namingService);
96 browser = new SUPERVGUI_Service(namingService);
97 //info = new SUPERVGUI_Information();
98 cursor = desktop->cursor();
99 connect(desktop->getMainFrame(), SIGNAL(windowActivated(QWidget*)), this, SLOT(setMain(QWidget*)));
102 parent->menuBar()->changeItem(anId,parent->getComponentUserName("SUPERV"));
108 QAD_StudyFrame* SUPERVGUI::createGraph() {
109 QAD_StudyFrame* aStudyFrame = study->newWindow3d(study->getNextStudyFrameName(),
110 VIEW_GRAPHSUPERV, false);
113 SIGNAL(supervStudyFrameClosing(QAD_ViewFrame*)),
115 SLOT(onGraphClosed(QAD_ViewFrame*)));
122 void SUPERVGUI::loadEngine(SALOME_NamingService* namingService) {
123 Trace("SUPERVGUI::loadEngine")
124 SALOME_LifeCycleCORBA LCC(namingService);
125 Engines::Component_var objComponent = LCC.FindOrLoad_Component("SuperVisionContainer", "SUPERV");
126 if (CORBA::is_nil(objComponent)) {
127 QMessageBox::warning(QAD_Application::getDesktop(), tr("ERROR"), tr("MSG_CANT_LOAD_SUPERV"));
131 SUPERV::SuperG_var aSuperVisionComponent;
132 aSuperVisionComponent = SUPERV::SuperG::_narrow(objComponent);
133 if (CORBA::is_nil(aSuperVisionComponent)) {
134 QMessageBox::warning(QAD_Application::getDesktop(), tr("ERROR"), tr("MSG_CANT_NARROW_SUPERV"));
138 // engine = new SUPERV::SuperG_var;
139 engine = aSuperVisionComponent;
142 bool SUPERVGUI::information(SUPERV_CNode node, bool isReadOnly) {
143 Trace("SUPERVGUI::information")
144 return(info->run(node, isReadOnly));
147 void SUPERVGUI::putInfo(const char* mess) {
148 Trace("SUPERVGUI::putInfo")
149 desktop->putInfo(mess);
152 QAD_Desktop* SUPERVGUI::getDesktop() {
153 Trace("SUPERVGUI::getDesktop")
157 SUPERV_Engine SUPERVGUI::getEngine() {
158 Trace("SUPERVGUI::getEngine")
162 SUPERVGUI_Service* SUPERVGUI::getBrowser() {
163 Trace("SUPERVGUI::getBrowser")
167 QCursor SUPERVGUI::getCursor() {
168 Trace("SUPERVGUI::getCursor")
172 SUPERVGUI_Main* SUPERVGUI::getMain() {
173 Trace("SUPERVGUI::getMain")
178 void SUPERVGUI::registerGraph(QString theName, SUPERVGUI_Main* theGraph){
179 theGraph->setHashCode(theName);
180 myGraphList.append(theGraph);
184 void SUPERVGUI::unregisterGraph(SUPERVGUI_Main* theGraph) {
185 SUPERVGUI_Main* aMain;
186 for (aMain = myGraphList.first(); aMain; aMain = myGraphList.next()) {
187 if (aMain == theGraph)
188 myGraphList.remove(aMain);
193 bool SUPERVGUI::isContains(QAD_Study* theStudy, const QString theKey) {
194 SUPERVGUI_Main* aMain;
195 for (aMain = myGraphList.first(); aMain; aMain = myGraphList.next()) {
196 if ((aMain->getStudy() == theStudy) && (aMain->getHashCode() == theKey))
203 void SUPERVGUI::onGraphClosed(QAD_ViewFrame* theViewFrame) {
204 if(SUPERVGraph_ViewFrame* supervFrame = dynamic_cast<SUPERVGraph_ViewFrame*>(theViewFrame)){
205 disconnect(study, 0 , this, 0);
206 SUPERVGraph_View* view = supervFrame->getViewWidget();
207 SUPERVGUI_Main* aGraph = dynamic_cast<SUPERVGUI_Main*>(view);
209 unregisterGraph(aGraph);
210 SUPERV_Graph aDataFlow = aGraph->getDataflow();
211 if ( !SUPERV_isNull( aDataFlow ) ) {
212 if ( aDataFlow->IsExecuting() ) {
213 const int aMsgResult = QMessageBox::warning(QAD_Application::getDesktop(),
215 tr("MSG_DF_RUNNING"),
216 tr("MSG_DF_EXECUTION"),
218 if ( aMsgResult == 1 ) {
220 if ( aDataFlow->Kill() ) {
221 // Kill() sends KillEvent and KillState to SUPERVGUI_Thread
222 // while sets myIsActive flag to false when it receives such event/state
223 // after myIsActive is false it calls QThread::exit() to terminate.
225 // why while() { qApp->processEvents() } ?
226 // because: SUPERVGUI_Thread::run() receives events, and calls myMain->execute()
227 // method using SALOME_Event paradigm, ProcessVoidEvent() function -
228 // it puts this event to the main application event loop, in which we are being now.
229 // So if we block main GUI application thread (by calling aGraph->getMyThread()->wait() here)
230 // then we will have a deadlock of 2 threads waiting for one another
231 while (aGraph->getMyThread()->running())
232 qApp->processEvents();
235 else { // BACKGROUND EXECUTION
236 emit KillMainThread(true); // set SUPERVGUI_Thread::myIsActive to false
237 while ( aGraph->getMyThread()->running() )
238 qApp->processEvents();
241 else { // EXECUTION IS FINISHED, JUST DESTROY THE SUPERVGUI_Thread object and return.
242 emit KillMainThread(true);
243 while ( aGraph->getMyThread()->running() )
244 qApp->processEvents();
251 void SUPERVGUI::setMain(QWidget* w) {
253 QAD_StudyFrame* aStudyFrame = dynamic_cast<QAD_StudyFrame*>(w);
254 if (!aStudyFrame) return;
256 study = aStudyFrame->getStudy();
259 QAD_ViewFrame* viewFrame = aStudyFrame->getRightFrame()->getViewFrame();
260 if(SUPERVGraph_ViewFrame* supervFrame = dynamic_cast<SUPERVGraph_ViewFrame*>(viewFrame)){
261 SUPERVGraph_View* view = supervFrame->getViewWidget();
263 main = dynamic_cast<SUPERVGUI_Main*>(view);
264 connect(&Supervision, SIGNAL(KillMainThread(bool)), main->getMyThread(), SLOT(KillThread(bool)));
267 Trace("SUPERVGUI::setMain - main: "<<main);
270 void SUPERVGUI::displayDataflow() {
271 Trace("SUPERVGUI::displayDataflow");
272 QAD_ObjectBrowser* aBrowser = ((QAD_StudyFrame*)(desktop->getMainFrame()->activeWindow()))->getLeftFrame()->getObjectBrowser();
273 SUPERV_Graph aDataFlow;
276 QAD_ObjectBrowserItem* item = (QAD_ObjectBrowserItem*)(aBrowser->getListView()->currentItem());
277 SALOMEDS::SObject_var aObj = desktop->getActiveStudy()->getStudyDocument()->FindObjectID(item->getEntry().latin1());
278 SALOMEDS::GenericAttribute_var anAttr;
279 if (aObj->FindAttribute(anAttr, "AttributeIOR")) {
280 SALOMEDS::AttributeIOR_var anIOR = SALOMEDS::AttributeIOR::_narrow(anAttr);
281 Standard_CString ior = anIOR->Value();
283 if (isContains(study, aIORName)) {
284 if (QMessageBox::warning(QAD_Application::getDesktop(), tr("WARNING"),
285 tr("MSG_GRAPH_DISPLAYED").arg(""),
286 QMessageBox::Yes, QMessageBox::No) == QMessageBox::No)
289 //aDataFlow = engine->getStreamGraph(ior);
290 aDataFlow = engine->getGraph(ior);
291 if (SUPERV_isNull(aDataFlow)) {
292 QMessageBox::warning(0, tr("ERROR"), tr("MSG_ACCESS_BAD_IOR"));
295 /* ASV: 20.10.04: fix for 6896
296 if (aDataFlow->IsStreamGraph()) {
297 SUPERV_StreamGraph aDataFlowStream = aDataFlow->ToStreamGraph();
298 if (SUPERV_isNull(aDataFlowStream)) {
299 QMessageBox::warning(0, tr("ERROR"), tr("MSG_ACCESS_BAD_IOR"));
302 aDataFlow = aDataFlowStream;
306 QAD_StudyFrame* aStudyFrame = createGraph();
307 SUPERVGraph_ViewFrame* aViewFrame = dynamic_cast<SUPERVGraph_ViewFrame*>
308 (aStudyFrame->getRightFrame()->getViewFrame());
310 main = new SUPERVGUI_Main(aViewFrame, desktop, aDataFlow);
311 main->setAsFromStudy(true);
312 registerGraph(aIORName, main);
313 study->showFrame(aStudyFrame);
318 void SUPERVGUI::renameDataflow() {
319 SALOME_Selection* Sel = SALOME_Selection::Selection( study->getSelection() );
320 SALOME_ListIteratorOfListIO It( Sel->StoredIObjects() );
321 for ( ; It.More(); It.Next() ) {
322 Handle(SALOME_InteractiveObject) IObject = It.Value();
324 SALOMEDS::Study_var aStudy = study->getStudyDocument();
325 SALOMEDS::SObject_var obj = aStudy->FindObjectID( IObject->getEntry() );
326 SALOMEDS::GenericAttribute_var anAttr;
327 SALOMEDS::AttributeName_var aName;
328 if ( !obj->_is_nil() ) {
329 if (obj->FindAttribute(anAttr, "AttributeName")) {
330 aName = SALOMEDS::AttributeName::_narrow(anAttr);
331 QString nm = QString( aName->Value() );
332 nm = SALOMEGUI_NameDlg::getName( QAD_Application::getDesktop(), nm );
333 if ( !nm.isEmpty() ) {
334 // sak : 24.11.04 : fix for PAL6898 : if rename fails (study locked),
335 // a message box is displayed, and cursor is "wait cursor". We think that "wait cursor"
336 // is not neccessary here, because the rename operation is fast.
337 //QApplication::setOverrideCursor( Qt::waitCursor );
338 study->renameIObject( IObject, nm );
339 //QApplication::restoreOverrideCursor();
346 void SUPERVGUI::exportDataflow() {
347 Trace("SUPERVGUI::exportDataflow")
349 QMessageBox::warning(QAD_Application::getDesktop(), tr("WARNING"), tr("MSG_NOWINDOW_TO_EXPORT"));
351 else if ( SUPERV_isNull( main->getDataflow() ) ) { // should not normally happen..
352 QMessageBox::warning(QAD_Application::getDesktop(), tr("WARNING"), tr("MSG_NOWINDOW_TO_EXPORT"));
355 QString f = QAD_FileDlg::getFileName(QAD_Application::getDesktop(),
358 tr("TTL_EXPORT_DATAFLOW"),
360 if ( !f.isEmpty() ) {
362 // asv : bug [VSR Bugs and Improvements in Supervisor] 1.8 : when exporting a file,
363 // a backup copy of an existing file must be created (in case Export fails..)
364 QString aBackupFile = SUPERVGUI::createBackupFile( f );
366 if ( main->getDataflow()->Export(f.latin1()) ) {
367 unregisterGraph(main);
368 registerGraph(f, main);
370 // remove a backup file if export was successfull
371 if ( !aBackupFile.isNull() && !aBackupFile.isEmpty() )
372 QFile::remove( aBackupFile );
375 QMessageBox::warning(QAD_Application::getDesktop(), tr("ERROR"), tr("MSG_BAD_WRITING").arg(aBackupFile));
382 *If a file with theOriginalFileName exists, then the function tries to create
383 * its backup copy of it (the_name + ".bakX", X = 0,1,2,..,99). Returns backup file's name
384 * If a file with theOriginalFileName does not exist, or creation fails - Return empty string.
386 QString SUPERVGUI::createBackupFile( const QString& theOriginalFileName ) {
387 QString theBackupFileName("");
388 if ( QFile::exists( theOriginalFileName ) ) {
389 // 1. construct a backup file name
392 theBackupFileName = theOriginalFileName;
393 theBackupFileName += ".bak";
394 theBackupFileName += QString::number(i++);
396 while ( QFile::exists( theBackupFileName ) && i < 100 ); // max 99 backup files
397 // if *.bak99 exists -- it will be overwritten
399 // 2. copy the original file to theBackupFileName
400 QString cmd( "cp \"");
401 cmd += theOriginalFileName;
403 cmd += theBackupFileName;
405 bool res = system( cmd.latin1() );
407 theBackupFileName = QString("");
409 return theBackupFileName;
412 void SUPERVGUI::newDataflow() {
413 createDataflow( New );
416 void SUPERVGUI::importDataflow() {
417 createDataflow( Import );
420 void SUPERVGUI::modifyDataflow() {
421 createDataflow( Modify );
424 bool SUPERVGUI::createDataflow( const NEW_DF_MODE mode ) {
425 Trace("SUPERVGUI::createDataflow, mode = " << mode );
427 // asv : 27.01.05 : fix for PAL7823 : if the study is locked - warn the user and return.
428 SALOMEDS::Study_var aStudy = study->getStudyDocument();
429 if ( aStudy->GetProperties()->IsLocked() ) {
430 QMessageBox::warning(QAD_Application::getDesktop(), tr("WRN_WARNING"), tr("WRN_STUDY_LOCKED"));
434 SUPERV::Graph_var aGraph;
436 QString f; // file name. declared here because may be used below in error msg construction..
437 if ( mode == Import || mode == Modify ) { // 0. import or modify existing dataflow - select XML file
438 QString title = QString( "TLT_CREATE_DF_%1" ).arg( mode );
439 f = QAD_FileDlg::getFileName( QAD_Application::getDesktop(), "", "*.xml", tr( title ), true );
440 if ( f.isEmpty() ) // pressed Cancel in file select dialog
443 // check if study already contains a graph imported from the same file
444 if ( isContains( study, f ) ) {
445 if ( QMessageBox::warning( QAD_Application::getDesktop(), tr("WARNING"), tr("MSG_GRAPH_DISPLAYED").arg(f),
446 QMessageBox::Yes, QMessageBox::No) == QMessageBox::No )
451 aGraph = ( mode == Import ) ? engine->StreamGraphE( f ) : engine->StreamGraph( f );
454 aGraph = engine->StreamGraph( MAIN_NEW );
456 if ( CORBA::is_nil( aGraph ) ) {
457 QString msg( mode == New ? QString("MSG_CANT_CREATE_DF") : QString("MSG_BAD_FILE").arg(f) );
458 QAD_MessageBox::warn1( QAD_Application::getDesktop(), tr("ERROR"), tr(msg), tr("BUT_OK") );
462 // 2. create a ViewFrame object
463 QAD_StudyFrame* aStudyFrame = createGraph();
464 SUPERVGraph_ViewFrame* aViewFrame = dynamic_cast<SUPERVGraph_ViewFrame*>
465 (aStudyFrame->getRightFrame()->getViewFrame());
468 // 3. bind Graph and ViewFrame == create SUPERVGUI_Main object
469 main = new SUPERVGUI_Main(aViewFrame, desktop, aGraph);
473 registerGraph( f, main );
474 study->showFrame(aStudyFrame);
480 void SUPERVGUI::reloadDataflow() {
481 Trace("SUPERVGUI::reloadDataflow");
485 QMessageBox::warning(QAD_Application::getDesktop(), tr("WARNING"), tr("MSG_NOWINDOW_TO_RELOAD"));
488 void SUPERVGUI::runDataflow() {
489 Trace("SUPERVGUI::runDataflow");
491 main->run( /*andSuspend=*/false );
493 QMessageBox::warning(QAD_Application::getDesktop(), tr("WARNING"), tr("MSG_NOWINDOW_TO_RUN"));
496 void SUPERVGUI::stepByStep() {
497 Trace("SUPERVGUI::stepByStep");
499 main->run( /*andSuspend=*/true );
501 QMessageBox::warning(QAD_Application::getDesktop(), tr("WARNING"), tr("MSG_NOWINDOW_TO_RUN"));
504 void SUPERVGUI::killDataflow() {
505 Trace("SUPERVGUI::killDataflow");
509 QMessageBox::warning(QAD_Application::getDesktop(), tr("WARNING"), tr("MSG_NOWINDOW_TO_KILL"));
512 void SUPERVGUI::suspendResumeDataflow() {
513 Trace("SUPERVGUI::suspendResumeDataflow");
515 main->suspendResume();
517 QMessageBox::warning(QAD_Application::getDesktop(), tr("WARNING"), tr("MSG_NOWINDOW_TO_SUSPEND"));
520 void SUPERVGUI::showComponents() {
521 Trace("SUPERVGUI::showComponents");
523 if ( main->isEditable() )
526 QMessageBox::warning(QAD_Application::getDesktop(), tr("WARNING"), tr("MSG_NOTEDITABLE"));
529 QMessageBox::warning(QAD_Application::getDesktop(), tr("WARNING"), tr("MSG_NOWINDOW_TO_ADD"));
534 bool SUPERVGUI::CustomPopup(QAD_Desktop* parent, QPopupMenu* popup, const QString& theContext, const QString& theParent, const QString& theObject) {
535 Trace("SUPERVGUI::customPopup");
536 Supervision.init(parent);
537 if(popup->count() > 3) {
538 // Temporary code: is to be deleted soon
539 popup->removeItem(QAD_Display_Popup_ID);
540 popup->removeItem(QAD_DisplayOnly_Popup_ID);
541 popup->removeItem(QAD_Erase_Popup_ID);
542 int id = popup->idAt(popup->count() - 1);
543 if (id < 0 && id != -1) popup->removeItem(id); // separator
544 // Temporary code end
546 SALOME_Selection* Sel = SALOME_Selection::Selection(study->getSelection() );
547 if ((Sel==NULL) || (Sel->IObjectCount() == 0)) return false;
549 if (Sel->IObjectCount() == 1) {
550 Handle(SALOME_InteractiveObject) anIObj = Sel->firstIObject();
552 // insert SUPERV-specific popup items here
554 bool isDataflow, ownObj;
555 whatIsSelected(anIObj, ownObj, isDataflow);
558 popup->insertItem(tr( "MSG_RENAME" ), this, SLOT(renameDataflow()));
559 popup->insertItem("Display", this, SLOT(displayDataflow()));
560 popup->insertSeparator();
563 popup->insertItem(tr("MSG_DELETE"), this, SLOT(deleteObject()));
565 if (Sel->IObjectCount() > 1) {
567 SALOME_ListIteratorOfListIO It_forCheckOwner(Sel->StoredIObjects());
568 for(;It_forCheckOwner.More();It_forCheckOwner.Next()) {
569 Handle(SALOME_InteractiveObject) anIObj = It_forCheckOwner.Value();
570 bool aIsOwner, aIsDataflow;
571 whatIsSelected(anIObj, aIsOwner, aIsDataflow);
573 if (aIsOwner) aIObjCount++;
575 if (aIObjCount == Sel->IObjectCount()) //all selected objects belong to Supervision
576 popup->insertItem(tr("MSG_DELETE"), this, SLOT(deleteObject()));
584 theIsOwner = true if Selected object belongs to Suipervision.
585 theIsDataflow = true if Selected object is Dataflow
587 void SUPERVGUI::whatIsSelected(const Handle(SALOME_InteractiveObject)& theObj, bool& theIsOwner, bool& theIsDataflow) {
589 theIsDataflow = false;
591 if (theObj.IsNull()) return;
593 SALOMEDS::Study_var aStudy = study->getStudyDocument();
594 SALOMEDS::SObject_var obj = aStudy->FindObjectID( theObj->getEntry() );
596 if ( !obj->_is_nil() ) {
597 SALOMEDS::SComponent_var comp = obj->GetFatherComponent();
598 if ( !comp->_is_nil() ) {
599 SALOMEDS::GenericAttribute_var anAttr;
600 SALOMEDS::AttributeName_var aName;
601 if (comp->FindAttribute(anAttr, "AttributeName")) {
602 aName = SALOMEDS::AttributeName::_narrow(anAttr);
603 QString compName(aName->Value());
604 //if (compName.compare(STUDY_SUPERVISION) == 0) {
605 if (compName.compare(QAD_Application::getDesktop()->getComponentUserName("SUPERV")) == 0) {
606 SALOMEDS::GenericAttribute_var anAttr;
607 if (obj->FindAttribute(anAttr, "AttributeIOR")) {
608 SALOMEDS::AttributeIOR_var anIOR = SALOMEDS::AttributeIOR::_narrow(anAttr);
609 //SUPERV_Graph aDataFlow = engine->getStreamGraph(anIOR->Value());
610 SUPERV_Graph aDataFlow = engine->getGraph(anIOR->Value());
611 if (!SUPERV_isNull(aDataFlow)) {
612 if (aDataFlow->IsStreamGraph()) {
613 if (!SUPERV_isNull(aDataFlow->ToStreamGraph()))
614 theIsDataflow = true;
617 theIsDataflow = true;
620 CORBA::String_var anObjectID = obj->GetID();
621 CORBA::String_var aComponentID = comp->GetID();
622 if (strcmp(anObjectID, aComponentID)) theIsOwner = true;
629 void SUPERVGUI::deleteObject() {
630 SALOME_Selection* Sel = SALOME_Selection::Selection(study->getSelection() );
631 if ((Sel==NULL) || (Sel->IObjectCount() == 0)) return;
633 // sak : 24.11.04 : fix for PAL6899 : if the study is locked - warn the user and return.
634 SALOMEDS::Study_var aStudy = study->getStudyDocument();
635 if ( aStudy->GetProperties()->IsLocked() ) {
636 QMessageBox::warning(QAD_Application::getDesktop(), tr("WRN_WARNING"), tr("WRN_STUDY_LOCKED"));
640 // sak : 24.11.04 : fix for PAL6901 : Incorrect deletion of the objects : pressing ESC button
641 // emitted "YES" button click, now it is corrected, and treated as "NO" button click.
642 if (QMessageBox::warning(QAD_Application::getDesktop(),
644 tr("MSG_ASK_DELETE"),
645 QMessageBox::No, QMessageBox::Yes) != QMessageBox::Yes)
648 SALOME_ListIteratorOfListIO It(Sel->StoredIObjects());
649 for(;It.More();It.Next()) {
650 Handle(SALOME_InteractiveObject) anIObj = It.Value();
651 bool aIsOwner, aIsDataflow;
652 whatIsSelected(anIObj, aIsOwner, aIsDataflow);
654 SALOMEDS::SObject_var aObj = aStudy->FindObjectID( anIObj->getEntry() );
655 if (!aObj->_is_nil()) {
657 SALOMEDS::GenericAttribute_var anAttr;
658 if (aObj->FindAttribute(anAttr, "AttributeIOR")) {
659 SALOMEDS::AttributeIOR_var anIOR = SALOMEDS::AttributeIOR::_narrow(anAttr);
660 QString ior = anIOR->Value();
662 SUPERVGUI_Main* aMain;
663 for (aMain = myGraphList.first(); aMain; aMain = myGraphList.next()) {
664 if ((aMain->getStudy() == study) && (aMain->getHashCode() == ior)) {
665 aMain->setAsFromStudy(false);
671 QAD_Operation* op = new SALOMEGUI_ImportOperation( study );
672 SALOMEDS::StudyBuilder_var aBuilder = aStudy->NewBuilder();
674 aBuilder->RemoveObjectWithChildren(aObj);
678 Sel->ClearIObjects() ;
681 bool SUPERVGUI::OnGUIEvent(int command, QAD_Desktop* parent) {
682 Supervision.init(parent);
685 Supervision.importDataflow();
689 Supervision.exportDataflow();
693 Supervision.newDataflow();
697 Supervision.modifyDataflow();
701 Supervision.reloadDataflow();
705 Supervision.runDataflow();
709 Supervision.killDataflow();
713 Supervision.suspendResumeDataflow();
717 Supervision.showComponents();
721 Supervision.stepByStep();
725 QMessageBox::warning(QAD_Application::getDesktop(), "Supervision Error", "Unknown Command From Salome");
730 bool SUPERVGUI::SetSettings(QAD_Desktop* parent) {
731 Trace("SUPERVGUI::SetSettings");
732 Supervision.init(parent);
736 void SUPERVGUI::DefinePopup(QString& theContext, QString& theParent, QString& theObject) {
741 bool SUPERVGUI::ActiveStudyChanged(QAD_Desktop* parent) {
742 Trace("SUPERVGUI::activeStudyChanged");
743 study = desktop->getActiveStudy();
747 void SUPERVGUI::SupportedViewType (int* buffer, int bufferSize)
749 if (!buffer || !bufferSize) return;
750 buffer[0] = (int)VIEW_GRAPHSUPERV;
755 Standard_EXPORT SALOMEGUI* GetComponentGUI() {