Changeset 5108
- Timestamp:
- Mar 9, 2015 2:58:35 PM (9 years ago)
- Location:
- branches/1.3
- Files:
-
- 7 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/1.3
-
branches/1.3/gui/scripts/visviewer.tcl
r5011 r5108 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.3/gui/scripts/vtkglyphviewer.tcl
r5014 r5108 1562 1562 if { $_currentColormap != "" } { 1563 1563 set cmap $_currentColormap 1564 SendCmd NoWait"legend $cmap $_colorMode $_curFldName {} $w $h 0"1564 SendCmd "legend $cmap $_colorMode $_curFldName {} $w $h 0" 1565 1565 } 1566 1566 } -
branches/1.3/gui/scripts/vtkisosurfaceviewer.tcl
r5086 r5108 1694 1694 if { $_currentColormap != "" } { 1695 1695 set cmap $_currentColormap 1696 SendCmd NoWait"legend $cmap scalar $_curFldName {} $w $h 0"1696 SendCmd "legend $cmap scalar $_curFldName {} $w $h 0" 1697 1697 } 1698 1698 } -
branches/1.3/gui/scripts/vtkstreamlinesviewer.tcl
r5011 r5108 1238 1238 itcl::body Rappture::VtkStreamlinesViewer::Pick {x y} { 1239 1239 foreach tag [CurrentDatasets -visible] { 1240 SendCmd NoWait"dataset getscalar pixel $x $y $tag"1240 SendCmd "dataset getscalar pixel $x $y $tag" 1241 1241 } 1242 1242 } … … 1522 1522 foreach {dataobj comp} [split $dataset -] break 1523 1523 if { [info exists _dataset2style($dataset)] } { 1524 SendCmd NoWait\1524 SendCmd \ 1525 1525 "legend $_dataset2style($dataset) $_colorMode $_curFldName {} $w $h 0" 1526 1526 break; -
branches/1.3/gui/scripts/vtksurfaceviewer.tcl
r5011 r5108 1475 1475 if { $_currentColormap != "" } { 1476 1476 set cmap $_currentColormap 1477 SendCmd NoWait"legend $cmap scalar $_curFldName {} $w $h 0"1477 SendCmd "legend $cmap scalar $_curFldName {} $w $h 0" 1478 1478 } 1479 1479 } -
branches/1.3/gui/scripts/vtkvolumeviewer.tcl
r4928 r5108 1464 1464 foreach {dataobj comp} [split $dataset -] break 1465 1465 if { [info exists _dataset2style($dataset)] } { 1466 SendCmd NoWait\1466 SendCmd \ 1467 1467 "legend $_dataset2style($dataset) $_colorMode $_curFldName {} $w $h 0" 1468 1468 break;
Note: See TracChangeset
for help on using the changeset viewer.