Changeset 5096
- Timestamp:
- Mar 8, 2015 1:52:25 AM (6 years ago)
- Location:
- branches/1.4
- Files:
-
- 7 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/1.4
-
branches/1.4/gui/scripts/visviewer.tcl
r5007 r5096 57 57 protected variable _debugConsole 0 58 58 protected variable _reportClientInfo 1 59 # Number of milliscends to wait for server reply before displaying wait 60 # dialog. If set to 0, dialog is never displayed. 59 61 protected variable _waitTimeout 0 60 62 … … 96 98 protected method SendBytes { bytes } 97 99 protected method SendCmd {string} 98 protected method SendCmdNoWait {string}99 100 protected method SendEcho { channel {data ""} } 100 101 protected method StartBufferingCommands {} … … 478 479 # StartWaiting -- 479 480 # 480 # Read some number of bytes from the visualization server. 481 # 482 481 # Display a waiting dialog after a timeout has passed 482 # 483 483 itcl::body Rappture::VisViewer::StartWaiting {} { 484 484 if { $_waitTimeout > 0 } { … … 488 488 } 489 489 490 # 491 # StopWaiting -- 492 # 493 # Take down waiting dialog 494 # 490 495 itcl::body Rappture::VisViewer::StopWaiting {} { 491 496 if { $_waitTimeout > 0 } { … … 1180 1185 } 1181 1186 } 1182 1183 #1184 # SendCmdNoWait1185 #1186 # Send commands off to the rendering server. If we're currently1187 # sending data objects to the server, buffer the commands to be1188 # sent later.1189 #1190 itcl::body Rappture::VisViewer::SendCmdNoWait {string} {1191 if { $_buffering } {1192 append _outbuf $string "\n"1193 } else {1194 SendBytes "$string\n"1195 }1196 } -
branches/1.4/gui/scripts/vtkglyphviewer.tcl
r5095 r5096 1565 1565 if { $_currentColormap != "" } { 1566 1566 set cmap $_currentColormap 1567 SendCmd NoWait"legend $cmap $_colorMode $_curFldName {} $w $h 0"1567 SendCmd "legend $cmap $_colorMode $_curFldName {} $w $h 0" 1568 1568 } 1569 1569 } -
branches/1.4/gui/scripts/vtkisosurfaceviewer.tcl
r5095 r5096 1690 1690 if { $_currentColormap != "" } { 1691 1691 set cmap $_currentColormap 1692 SendCmd NoWait"legend $cmap scalar $_curFldName {} $w $h 0"1692 SendCmd "legend $cmap scalar $_curFldName {} $w $h 0" 1693 1693 } 1694 1694 } -
branches/1.4/gui/scripts/vtkstreamlinesviewer.tcl
r5095 r5096 1239 1239 itcl::body Rappture::VtkStreamlinesViewer::Pick {x y} { 1240 1240 foreach tag [CurrentDatasets -visible] { 1241 SendCmd NoWait"dataset getscalar pixel $x $y $tag"1241 SendCmd "dataset getscalar pixel $x $y $tag" 1242 1242 } 1243 1243 } … … 1523 1523 foreach {dataobj comp} [split $dataset -] break 1524 1524 if { [info exists _dataset2style($dataset)] } { 1525 SendCmd NoWait\1525 SendCmd \ 1526 1526 "legend $_dataset2style($dataset) $_colorMode $_curFldName {} $w $h 0" 1527 1527 break; -
branches/1.4/gui/scripts/vtksurfaceviewer.tcl
r5095 r5096 1476 1476 if { $_currentColormap != "" } { 1477 1477 set cmap $_currentColormap 1478 SendCmd NoWait"legend $cmap scalar $_curFldName {} $w $h 0"1478 SendCmd "legend $cmap scalar $_curFldName {} $w $h 0" 1479 1479 } 1480 1480 } -
branches/1.4/gui/scripts/vtkvolumeviewer.tcl
r5095 r5096 1541 1541 foreach {dataobj comp} [split $dataset -] break 1542 1542 if { [info exists _dataset2style($dataset)] } { 1543 SendCmd NoWait\1543 SendCmd \ 1544 1544 "legend2 $_dataset2style($dataset) $w $h" 1545 1545 #"legend $_dataset2style($dataset) $_colorMode $_curFldName {} $w $h 0"
Note: See TracChangeset
for help on using the changeset viewer.