]> Creatis software - bbtk.git/commitdiff
*** empty log message ***
authorguigues <guigues>
Tue, 22 Apr 2008 06:59:31 +0000 (06:59 +0000)
committerguigues <guigues>
Tue, 22 Apr 2008 06:59:31 +0000 (06:59 +0000)
12 files changed:
kernel/src/bbtkBlackBox.cxx
kernel/src/bbtkBlackBoxDescriptor.h
kernel/src/bbtkComplexBlackBox.cxx
kernel/src/bbtkConnection.cxx
kernel/src/bbtkExecuter.cxx
kernel/src/bbtkFactory.cxx
kernel/src/bbtkInterpreter.cxx
kernel/src/bbtkMessageManager.cxx
kernel/src/bbtkPackage.cxx
kernel/src/bbtkVirtualExec.h
packages/wx/bbs/boxes/bbGUIcolour.bbs [new file with mode: 0644]
packages/wx/bbs/boxes/bbGUIint.bbs [new file with mode: 0644]

index dbba13d64ef5a35755f0609d166fc1cd80703ef9..084e5195861e7ebaf7438abe8073eb9ca986ce6c 100644 (file)
@@ -3,8 +3,8 @@
 Program:   bbtk
 Module:    $RCSfile: bbtkBlackBox.cxx,v $
 Language:  C++
-Date:      $Date: 2008/04/21 12:43:05 $
-Version:   $Revision: 1.11 $
+Date:      $Date: 2008/04/22 06:59:31 $
+Version:   $Revision: 1.12 $
                                                                                 
 Copyright (c) CREATIS (Centre de Recherche et d'Applications en Traitement de
 l'Image). All rights reserved. See doc/license.txt or
@@ -604,10 +604,13 @@ namespace bbtk
   /// Connects the input <name> to the connection c
   void BlackBox::bbConnectInput( const std::string& name, Connection::Pointer c)
   {
-    bbtkDebugMessageInc("Kernel",7,
-                       "BlackBox::bbConnectInput(\""<<name<<"\","<<c<<") ["
+    bbtkDebugMessage("connection",2,
+                       "==> BlackBox::bbConnectInput(\""
+                       <<name<<"\","<<c->GetFullName()<<") ["
                        <<bbGetFullName()<<"]"
                        <<std::endl);       
+
+
     InputConnectorMapType::iterator i = bbGetInputConnectorMap().find(name);
     if (i==bbGetInputConnectorMap().end())
       {
@@ -615,9 +618,13 @@ namespace bbtk
       }
     i->second->SetConnection(c);
     
+    bbtkDebugMessage("connection",2,
+                       "<== BlackBox::bbConnectInput(\""
+                       <<name<<"\","<<c->GetFullName()<<") ["
+                       <<bbGetFullName()<<"]"
+                       <<std::endl);       
     //  bbSetModifiedStatus();
 
-    bbtkDebugDecTab("Kernel",7);
   }
   //=========================================================================
 
@@ -626,10 +633,11 @@ namespace bbtk
   /// Connects the output <name> to the connection c
   void BlackBox::bbConnectOutput( const std::string& name, Connection::Pointer c)
   {
-    bbtkDebugMessageInc("Kernel",7,
-                       "BlackBox::bbConnectOutput(\""<<name<<"\","<<c<<") ["
-                       <<bbGetFullName()<<"]"<<std::endl);       
-
+    bbtkDebugMessage("connection",2,
+                    "==> BlackBox::bbConnectOutput(\""<<name<<"\","
+                    <<c->GetFullName()<<") ["
+                    <<bbGetFullName()<<"]"<<std::endl);       
+    
     OutputConnectorMapType::iterator i = bbGetOutputConnectorMap().find(name);
     if (i==bbGetOutputConnectorMap().end())
       {
@@ -637,7 +645,11 @@ namespace bbtk
       }
     i->second->SetConnection(c);
 
-    bbtkDebugDecTab("Kernel",7);
+    bbtkDebugMessage("connection",2,
+                    "<== BlackBox::bbConnectOutput(\""<<name<<"\","
+                    <<c->GetFullName()<<") ["
+                    <<bbGetFullName()<<"]"<<std::endl);       
+
   }
   //=========================================================================
 
@@ -646,12 +658,19 @@ namespace bbtk
   /// Disconnects the input <name> from the connection c
   void BlackBox::bbDisconnectInput( const std::string& name, Connection::Pointer c)
   {
-    if (!c) return;
-    bbtkDebugMessageInc("Kernel",7,
-                       "BlackBox::bbDisconnectInput(\""<<name
-                       <<"\","<<c<<") ["
-                       <<bbGetFullName()<<"]"
-                       <<std::endl);      
+
+    bbtkDebugMessage("connection",2,
+                    "==> BlackBox::bbDisconnectInput(\""<<name
+                    <<"\","<<c->GetFullName()<<") ["
+                    <<bbGetFullName()<<"]"
+                    <<std::endl);      
+
+    if (!c) 
+      {
+
+       bbtkDebugMessage("connection",2,"c==0"<<std::endl);     
+       return;
+      }
 
     InputConnectorMapType::iterator i = bbGetInputConnectorMap().find(name);
     if (i==bbGetInputConnectorMap().end())
@@ -660,7 +679,12 @@ namespace bbtk
       }
     i->second->UnsetConnection(c);
 
-    bbtkDebugDecTab("Kernel",7);
+    bbtkDebugMessage("connection",2,
+                    "<== BlackBox::bbDisconnectInput(\""<<name
+                    <<"\","<<c->GetFullName()<<") ["
+                    <<bbGetFullName()<<"]"
+                    <<std::endl);      
+
   }
   //=========================================================================
 
@@ -669,12 +693,17 @@ namespace bbtk
   /// Disconnects the output <name> from the connection c
   void BlackBox::bbDisconnectOutput( const std::string& name, Connection::Pointer c)
   {
-    if (!c) return;
-    bbtkDebugMessageInc("Kernel",7,
-                       "BlackBox::bbDisconnectOutput(\""<<name
-                       <<"\","<<c<<") ["
-                       <<bbGetFullName()<<"]"
-                       <<std::endl);       
+    bbtkDebugMessage("connection",2,
+                    "==> BlackBox::bbDisconnectOutput(\""<<name
+                    <<"\","<<c->GetFullName()<<") ["
+                    <<bbGetFullName()<<"]"
+                    <<std::endl);       
+    if (!c) 
+      {
+
+       bbtkDebugMessage("connection",2,"c==0"<<std::endl);     
+       return;
+      }
 
     OutputConnectorMapType::iterator i = bbGetOutputConnectorMap().find(name);
     if (i==bbGetOutputConnectorMap().end())
@@ -683,7 +712,11 @@ namespace bbtk
       }
     i->second->UnsetConnection(c);
 
-    bbtkDebugDecTab("Kernel",7);
+    bbtkDebugMessage("connection",2,
+                    "<== BlackBox::bbDisconnectOutput(\""<<name
+                    <<"\","<<c->GetFullName()<<") ["
+                    <<bbGetFullName()<<"]"
+                    <<std::endl);       
   } 
   //=========================================================================
  
index 4d047c6ef106dd9819bdbb7b5e30005a3f428938..d826882c5664ca9441f4cff8336492759d0edfd6 100644 (file)
@@ -3,8 +3,8 @@
   Program:   bbtk
   Module:    $RCSfile: bbtkBlackBoxDescriptor.h,v $
   Language:  C++
-  Date:      $Date: 2008/04/18 12:59:15 $
-  Version:   $Revision: 1.9 $
+  Date:      $Date: 2008/04/22 06:59:31 $
+  Version:   $Revision: 1.10 $
                                                                                 
   Copyright (c) CREATIS (Centre de Recherche et d'Applications en Traitement de
   l'Image). All rights reserved. See Doc/License.txt or
@@ -61,8 +61,8 @@ namespace bbtk
       STANDARD=0,
       ADAPTOR=1,
       DEFAULT_ADAPTOR=2,
-      WIDGET_ADAPTOR=3,
-      DEFAULT_WIDGET_ADAPTOR=4
+      GUI=3,
+      DEFAULT_GUI=4
     }
     Kind;
 
index 922701b645a743c4704a0cc7cc3770c737e6c9c0..840c596091e0c1e404355089e7a05c7c6088fe13 100644 (file)
@@ -3,8 +3,8 @@
 Program:   bbtk
 Module:    $RCSfile: bbtkComplexBlackBox.cxx,v $
 Language:  C++
-Date:      $Date: 2008/04/21 12:43:05 $
-Version:   $Revision: 1.12 $
+Date:      $Date: 2008/04/22 06:59:31 $
+Version:   $Revision: 1.13 $
                                                                                 
 Copyright (c) CREATIS (Centre de Recherche et d'Applications en Traitement de
 l'Image). All rights reserved. See Doc/License.txt or
@@ -324,6 +324,13 @@ namespace bbtk
        bbtkInternalError("ComplexBlackBox::bbBackwardUpdate called with caller=0");
       }
 
+    std::cout << "CBB BUP : "<<caller->GetBlackBoxFrom()->bbGetFullName()
+             <<"."<<caller->GetBlackBoxFromOutput()<<"----"
+             <<caller->GetOriginalBlackBoxFrom()->bbGetFullName()
+             <<"."<<caller->GetOriginalBlackBoxFromOutput()<<std::endl;
+      
+      
+
 
     IOStatus s = UPTODATE;
     const BlackBoxDescriptor::OutputDescriptorMapType& omap 
@@ -474,24 +481,31 @@ namespace bbtk
   /// Connects the input <name> to the connection c
   void ComplexBlackBox::bbConnectInput( const std::string& name, Connection::Pointer c)
   {
-    bbtkDebugMessageInc("Kernel",7,
-                       "ComplexBlackBox::bbConnectInput(\""
-                       <<name<<"\","<<c<<") ["
-                       <<bbGetFullName()<<"]"
-                       <<std::endl);       
-
+    bbtkDebugMessage("connection",2,
+                    "==> ComplexBlackBox::bbConnectInput(\""
+                    <<name<<"\","<<c->GetFullName()<<") ["
+                    <<bbGetFullName()<<"]"
+                    <<std::endl);       
+    
    ComplexBlackBoxInputDescriptor* d = (ComplexBlackBoxInputDescriptor*)
       bbGetDescriptor()->GetInputDescriptor(name);
 
+
    BlackBox::Pointer t = bbGetBlackBox(d->GetTarget());
+
+   bbtkDebugMessage("connection",2," - Target = "<<d->GetTarget()<<" = "<<t->bbGetFullName()<<std::endl);
+
    c->SetBlackBoxTo(t);
    c->SetBlackBoxToInput(d->GetInput());
-   t->bbConnectInput(d->GetInput(),c);
 
-   bbtkMessage("Debug",1,"ComplexBlackBox["<<bbGetFullName()<<"]::bbConnectInput : "
-              <<c->GetFullName()<<std::endl);
+   bbtkDebugMessage("connection",2," - New conn = "<<c->GetFullName()<<std::endl);
+   t->bbConnectInput(d->GetInput(),c);
 
-    bbtkDebugDecTab("Kernel",7);
+   bbtkDebugMessage("connection",2,
+                    "<== ComplexBlackBox::bbConnectInput(\""
+                    <<name<<"\","<<c->GetFullName()<<") ["
+                    <<bbGetFullName()<<"]"
+                    <<std::endl);       
   }
   //=========================================================================
 
@@ -500,24 +514,29 @@ namespace bbtk
   /// Connects the output <name> to the connection c
   void ComplexBlackBox::bbConnectOutput( const std::string& name, Connection::Pointer c)
   {
-    bbtkDebugMessageInc("Kernel",7,
-                       "ComplexBlackBox::bbConnectOutput(\""
-                       <<name<<"\","<<c<<") ["
-                       <<bbGetFullName()<<"]"<<std::endl);       
+    bbtkDebugMessage("connection",2,
+                    "==> ComplexBlackBox::bbConnectOutput(\""
+                    <<name<<"\","<<c->GetFullName()<<") ["
+                    <<bbGetFullName()<<"]"<<std::endl);       
 
    ComplexBlackBoxOutputDescriptor* d = (ComplexBlackBoxOutputDescriptor*)
       bbGetDescriptor()->GetOutputDescriptor(name);
 
    BlackBox::Pointer t = bbGetBlackBox(d->GetTarget());
+  bbtkDebugMessage("connection",2," - Target = "<<d->GetTarget()<<" = "<<t->bbGetFullName()<<std::endl);
 
    c->SetBlackBoxFrom(t);
    c->SetBlackBoxFromOutput(d->GetOutput());
+
+   bbtkDebugMessage("connection",2," - New conn = "<<c->GetFullName()<<std::endl);
+
    t->bbConnectOutput(d->GetOutput(),c);
   
-   bbtkMessage("Debug",5,"ComplexBlackBox["<<bbGetFullName()<<"]::bbConnectOutput : "
-              <<c->GetFullName()<<std::endl);
-
-    bbtkDebugDecTab("Kernel",7);
+    bbtkDebugMessage("connection",2,
+                    "<== ComplexBlackBox::bbConnectOutput(\""
+                    <<name<<"\","<<c->GetFullName()<<") ["
+                    <<bbGetFullName()<<"]"<<std::endl);       
   }
   //=========================================================================
 
@@ -581,7 +600,7 @@ namespace bbtk
        for ( j = mConnectionList.begin(); 
              j != mConnectionList.end(); ++j ) 
          {
-           //(*j)->Check();
+           (*j)->Check();
          }
       }
     if (p.use_count()!=1) 
index 1e84edfa3d0395e3afa7da5b930913703c8d0ecf..9c8487ace1fe496f21762f539e1f6bd1bc5fc93b 100644 (file)
@@ -3,8 +3,8 @@
   Program:   bbtk
   Module:    $RCSfile: bbtkConnection.cxx,v $
   Language:  C++
-  Date:      $Date: 2008/04/18 12:59:15 $
-  Version:   $Revision: 1.7 $
+  Date:      $Date: 2008/04/22 06:59:31 $
+  Version:   $Revision: 1.8 $
                                                                                 
   Copyright (c) CREATIS (Centre de Recherche et d'Applications en Traitement de
   l'Image). All rights reserved. See doc/license.txt or
@@ -62,6 +62,11 @@ Connection::Connection(BlackBox::Pointer from, const std::string& output,
                     <<to->bbGetName()<<"\",\""<<input<<"\")"
                     <<std::endl);    
 
+    bbtkDebugMessage("connection",1,"==> Connection::Connection(\""
+                    <<from->bbGetFullName()<<"\",\""<<output<<"\",\""
+                    <<to->bbGetFullName()<<"\",\""<<input<<"\")"
+                    <<std::endl);    
+
     
 
     if (! from->bbHasOutput(output) )
@@ -128,10 +133,7 @@ Connection::Connection(BlackBox::Pointer from, const std::string& output,
          }
       }
 
-     // Lock this pointer !!!
-    Pointer p = MakePointer(this,true);
-    from->bbConnectOutput(output,p);
-    to->bbConnectInput(input,p);
+
     mFrom = from;
     mOriginalFrom = from;
     mTo = to;
@@ -139,7 +141,17 @@ Connection::Connection(BlackBox::Pointer from, const std::string& output,
     mInput = mOriginalInput = input;
     mOutput = mOriginalOutput = output;
 
+     // Lock this pointer !!!
+    Pointer p = MakePointer(this,true);
+    from->bbConnectOutput(output,p);
+    to->bbConnectInput(input,p);
+
     
+    bbtkDebugMessage("connection",1,"<== Connection::Connection(\""
+                    <<from->bbGetFullName()<<"\",\""<<output<<"\",\""
+                    <<to->bbGetFullName()<<"\",\""<<input<<"\")"
+                    <<std::endl);    
+
     bbtkDebugMessage("object",2,"==> Connection::Connection(\""
                     <<from->bbGetName()<<"\",\""<<output<<"\",\""
                     <<to->bbGetName()<<"\",\""<<input<<"\")"
index 67e4788268b216a4975a899b7403ee8b49d52e44..ee60d2e992e98ea035c9615581be167c7e39777b 100644 (file)
@@ -3,8 +3,8 @@
   Program:   bbtk
   Module:    $RCSfile: bbtkExecuter.cxx,v $ $
   Language:  C++
-  Date:      $Date: 2008/04/18 12:59:15 $
-  Version:   $Revision: 1.18 $
+  Date:      $Date: 2008/04/22 06:59:31 $
+  Version:   $Revision: 1.19 $
 
   Copyright (c) CREATIS (Centre de Recherche et d'Applications en Traitement de
   l'Image). All rights reserved. See Doc/License.txt or
@@ -250,21 +250,21 @@ namespace bbtk
        Current()->AddToCategory("adaptor");
        Current()->SetKind(bbtk::BlackBoxDescriptor::DEFAULT_ADAPTOR);
       }
-    if (kind=="WIDGET_ADAPTOR")
+    if (kind=="GUI")
       {
-       Current()->AddToCategory("adaptor");
-       Current()->SetKind(bbtk::BlackBoxDescriptor::WIDGET_ADAPTOR);
+       Current()->AddToCategory("gui");
+       Current()->SetKind(bbtk::BlackBoxDescriptor::GUI);
       }
-    else if (kind=="DEFAULT_WIDGET_ADAPTOR")
+    else if (kind=="DEFAULT_GUI")
       {
-       Current()->AddToCategory("adaptor");
-       Current()->SetKind(bbtk::BlackBoxDescriptor::DEFAULT_WIDGET_ADAPTOR);
+       Current()->AddToCategory("gui");
+       Current()->SetKind(bbtk::BlackBoxDescriptor::DEFAULT_GUI);
       }
     else
       {
        bbtkError("Unknown box kind : '"<<kind<<"'. "
                  <<"Valid kinds are 'ADAPTOR','DEFAULT_ADAPTOR',"
-                 <<"'WIDGET_ADAPTOR','DEFAULT_WIDGET_ADAPTOR'");
+                 <<"'GUI','DEFAULT_GUI'");
       }
   }
   //=======================================================================
index 22c6ad362cf4556c3b0715a2c68041800d40dadc..6ec28e5000ebfc5b338d688e9bbc6118682922ae 100644 (file)
@@ -4,8 +4,8 @@ Program:   bbtk
 Module:    $RCSfile: bbtkFactory.cxx,v $
 Language:  C++
 
-Date:      $Date: 2008/04/21 11:38:19 $
-Version:   $Revision: 1.34 $
+Date:      $Date: 2008/04/22 06:59:31 $
+Version:   $Revision: 1.35 $
                                                                                 
 
 Copyright (c) CREATIS (Centre de Recherche et d'Applications en Traitement de
@@ -670,7 +670,7 @@ namespace bbtk
                 ++j)
              {
                if ( ( j->first.mKind ==  
-                      BlackBoxDescriptor::DEFAULT_WIDGET_ADAPTOR) &&
+                      BlackBoxDescriptor::DEFAULT_GUI) &&
                     //(j->first.mTypeIn == typein) &&
                     (j->first.mTypeOut.GetNature() == typeout.GetNature() ) 
                     )
index ede613aae17a55c7142de17f212c98ed20d9a02e..ff2fbb17d123e2769ea1bf56a5c35a3f3ef48565 100644 (file)
@@ -3,8 +3,8 @@
   Program:   bbtk
   Module:    $RCSfile: bbtkInterpreter.cxx,v $ $
   Language:  C++
-  Date:      $Date: 2008/04/18 12:59:15 $
-  Version:   $Revision: 1.60 $
+  Date:      $Date: 2008/04/22 06:59:31 $
+  Version:   $Revision: 1.61 $
                                                                                 
   Copyright (c) CREATIS (Centre de Recherche et d'Applications en Traitement de
   l'Image). All rights reserved. See Doc/License.txt or
@@ -579,7 +579,6 @@ namespace bbtk
   /// Runs the interpretation of a command
   Interpreter::ExitStatus Interpreter::InterpretLine( const std::string& line )
   {
-printf("EED Interpreter::InterpretLine %s \n", line.c_str() );
     bbtkDebugMessageInc("Interpreter",9,"Interpreter::InterpretLine('"<<line<<"')"<<std::endl);
 
     ExitStatus status = Interpreter_OK;
index 6812de0f7d87a5dd528160c5f8ee85871b0d7218..4bdb1bee7f4d9fcd12464738b71d21975ea649e2 100644 (file)
@@ -3,8 +3,8 @@
   Program:   bbtk
   Module:    $RCSfile: bbtkMessageManager.cxx,v $
   Language:  C++
-  Date:      $Date: 2008/04/18 12:59:15 $
-  Version:   $Revision: 1.5 $
+  Date:      $Date: 2008/04/22 06:59:31 $
+  Version:   $Revision: 1.6 $
                                                                                 
   Copyright (c) CREATIS (Centre de Recherche et d'Applications en Traitement de
   l'Image). All rights reserved. See Doc/License.txt or
@@ -81,6 +81,10 @@ namespace bbtk
     mMessageLevel[key] = 0;
     mMessageHelp[key] = "Packages related messages";
     if (mMaxMessageLength<key.length()) mMaxMessageLength = key.length();
+    key = "connection";
+    mMessageLevel[key] = 0;
+    mMessageHelp[key] = "Connections related messages";
+    if (mMaxMessageLength<key.length()) mMaxMessageLength = key.length();
    }
 
 
index 94286b37811f8f99a3cc8b17a8b1ddbd51c0636f..29bd891d79008fd75b062b1c9800d51f3f03d622 100644 (file)
@@ -3,8 +3,8 @@
   Program:   bbtk
   Module:    $RCSfile: bbtkPackage.cxx,v $
   Language:  C++
-  Date:      $Date: 2008/04/18 12:59:15 $
-  Version:   $Revision: 1.13 $
+  Date:      $Date: 2008/04/22 06:59:31 $
+  Version:   $Revision: 1.14 $
                                                                                 
   Copyright (c) CREATIS (Centre de Recherche et d'Applications en Traitement de
   l'Image). All rights reserved. See doc/license.txt or
@@ -696,7 +696,7 @@ namespace bbtk
                        <<name<<"\")"<<bbtkendl);
 
     AdaptorKey key(typein,typeout,
-                  BlackBoxDescriptor::DEFAULT_WIDGET_ADAPTOR);
+                  BlackBoxDescriptor::DEFAULT_GUI);
     AdaptorMapType::const_iterator i = mAdaptorMap.find(key);
     if (i == mAdaptorMap.end())  
       {
@@ -729,7 +729,7 @@ namespace bbtk
     AdaptorKey key(/*typein*/
                   DataInfo(typeid(void),""),
                   typeout,
-                  BlackBoxDescriptor::DEFAULT_WIDGET_ADAPTOR);
+                  BlackBoxDescriptor::DEFAULT_GUI);
     // First try to find a single widget adaptor
     AdaptorMapType::const_iterator i = mAdaptorMap.find(key);
     if (i == mAdaptorMap.end())  
@@ -825,7 +825,7 @@ namespace bbtk
          }
       }
     // If it is a default adaptor, also register it in the adaptors map
-    else if ( d->GetKind() == BlackBoxDescriptor::DEFAULT_WIDGET_ADAPTOR)
+    else if ( d->GetKind() == BlackBoxDescriptor::DEFAULT_GUI)
       {
        bbtkDebugMessage("Kernel",8,"Package<"<<GetName()<<">::RegisterBlackBox(\""<<d->GetTypeName()<<"\") : The box is a widget adaptor, inserting it in adaptors map ..."<<std::endl);   
        
index cc2d81b547a170aad6b09fa1fd4d66f683d2e0da..ea62f2385af33900f2fcc87c53b7f9af0121803a 100644 (file)
@@ -3,8 +3,8 @@
   Program:   bbtk
   Module:    $RCSfile: bbtkVirtualExec.h,v $ $
   Language:  C++
-  Date:      $Date: 2008/04/18 12:59:16 $
-  Version:   $Revision: 1.12 $
+  Date:      $Date: 2008/04/22 06:59:31 $
+  Version:   $Revision: 1.13 $
                                                                                 
   Copyright (c) CREATIS (Centre de Recherche et d'Applications en Traitement de
   l'Image). All rights reserved. See Doc/License.txt or
@@ -181,7 +181,7 @@ namespace bbtk
     /// Prints the string ... MORE : TO EXPLAIN 
     virtual void Print(const std::string & message) = 0;
 
-    ComplexBlackBoxDescriptor::Pointer GetWorkspace() 
+    virtual ComplexBlackBoxDescriptor::Pointer GetWorkspace() 
     { return  ComplexBlackBoxDescriptor::Pointer(); }
   
   //  static const std::string& GetObjectDescription() = 0;
diff --git a/packages/wx/bbs/boxes/bbGUIcolour.bbs b/packages/wx/bbs/boxes/bbGUIcolour.bbs
new file mode 100644 (file)
index 0000000..817fd43
--- /dev/null
@@ -0,0 +1,10 @@
+load wx
+define GUIcolour wx
+  kind DEFAULT_GUI
+  new ColourSelectorButton colour
+  input In colour.In "Initial colour"
+  input Label colour.WinTitle "Label"
+  output Out colour.Out "Selected colour"
+  output Widget colour.Widget "Widget"
+  output BoxChange colour.BoxChange "BoxChange"
+endefine
diff --git a/packages/wx/bbs/boxes/bbGUIint.bbs b/packages/wx/bbs/boxes/bbGUIint.bbs
new file mode 100644 (file)
index 0000000..684d36d
--- /dev/null
@@ -0,0 +1,14 @@
+load std
+load wx
+define GUIint wx
+  kind DEFAULT_GUI
+  new Slider slider
+  set slider.Label true
+#  set slider.ReactiveOnTrack true
+  set slider.ChangeResolution true
+  input In slider.In "Initial position"
+  input Label slider.Title "Label"
+  output Out slider.Out "Current position"
+  output Widget slider.Widget "Widget"
+  output BoxChange slider.BoxChange "BoxChange"
+endefine