::SetNextCollector

This command will be used to set the the next collector to be activated when this mdlTempCollector reference is resolved.

Syntax

::model::mdlTempCollector::SetNextCollector argPresent argNext argNextType

Application

MotionView Tcl

Description

This command will be used to set the the next collector to be activated when this mdlTempCollector reference is resolved.

Inputs

argPresent
This argument is the path of the mdlTempCollector 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 mdlTempCollector 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 mdlTempCollector. If the next collector to be activated is not an mdlTempCollector, then this argument needs to be set to that type (ex. mdlTempListCollector/mdlCollector/mdlListCollector).

Example

set first_var ""
set second_var ""
set third_var ""
set tmp_selected_item1 ""
set tmp_selected_item2 ""

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 ::tmp_selected_item1} {Graphic Graphic ::tmp_selected_item2}}
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.