::SetNextCollector
This command is used to set the next collector to be activated when this mdlTempListCollector reference is resolved.
Syntax
::model::mdlTempListCollector::SetNextCollector argPresent argNext argNextType
Application
MotionView Tcl
Description
This command is used to set the next collector to be activated when this mdlTempListCollector reference is resolved.
Inputs
- argPresent
- This argument is the path of the mdlTempListCollector widget for which we are specifying the next collector to be activated.
- argNext
- This is the path of the next collector widget that is to be activated after this mdlTempListCollector reference is resolved.
- argNextType
- This is the type of the next collector widget that is to be activated. If it is not specified, then the type is assumed to be another mdlTempListCollector. If the next collector to be activated is not an mdlTempListCollector, then this argument needs to be set to that type (ex. mdlTempCollector/mdlCollector/mdlListCollector).
Example
set first_var ""
set second_var ""
set third_var ""
set sel1 ""
set sel2 ""
set top [toplevel .test]
set colFrm [frame $top.tmpFrm1 ]
pack $colFrm
set col1 [::model::mdlTempCollector $colFrm.col1 ::first_var "Point" "Point" ]
pack $col1
set col2 [::model::mdlTempCollector $colFrm.col2 ::second_var "Point" "Point" ]
pack $col2
set types {{Body Body ::sel1} {Graphic Graphic ::sel2}}
set col3 [::model::mdlTempListCollector $colFrm.col3 ::third_var "$types" ]
pack $col3
# make the collectors get activated in the following order 1-3-2-1
::model::mdlTempCollector::SetNextCollector $col1 $col3 "mdlTempListCollector"
::model::mdlTempListCollector::SetNextCollector $col3 $col2 "mdlTempCollector"
::model::mdlTempCollector::SetNextCollector $col2 $col1
Errors
None.