In vt.tcl add the following line at the top
package required Tix
In Your Script that calls vt.tcl
#
#-------------------------------------------------------------------------------
#---[ Set The Prefered Environment ]
export TCLBIN="/apps/devtools/tcl-8.0.3/bin";
export TCL_LIB="/apps/devtools/tcl-8.0.3/lib";
export TCL_LIBRARY="${TCL_LIB}/tcl8.0";
export TK_LIBRARY="${TCL_LIB}/tk8.0";
export BLT_LIBRARY="${TCL_LIB}/blt2.4";
export TKX_LIBRARY="${TCL_LIB}/tk8.0";
export TIX_LIBRARY="${TCL_LIB}/tix4.1.0";
export EFFTCL_LIBRARY="${TCL_LIB}/efftcl1.0";
export BWIDGET_LIB="${TCL_LIB}/BWidget-1.2.1";
export ORATCL_LIB="${TCL_LIB}/Oratcl25";
export EXPECT5_LIB="${TCL_LIB}/expect5.26";
#
#-------------------------------------------------------------------------------
#---[ Launch the weapon ]
VTCLBIN="/apps/devtools/vtcl/vtcl-1.2.0";
exec ${TCLBIN}/wish -f ${VTCLBIN}/vt.tcl &;;
In your tcl application add the following to the
proc init {argc argv} {
global env
global TCLHOME
global TCL_LIB
global TIX_LIBRARY
catch {set TCLHOME $env(TCLHOME)}
catch {set TCL_LIB $env(TCL_LIB)}
catch {set TIX_LIBRARY $env(TIX_LIBRARY)}
source $TCLHOME/File4vsql.tcl
source $TCLHOME/commands.tcl
source $TCLHOME/database.tcl
source $TCLHOME/oracle.tcl
package require Tix
}
Eric Taylor <[EMAIL PROTECTED]> on 06/15/2000 07:39:23 PM
Please respond to [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
cc: (bcc: Ralph McCord/CIMG/CVG)
Subject: [vtcl-user] Tix
Hi:
Does VTCL work with Tix? I see there are
files that look like it should be supported.
Is there something I need to do to turn on
support for Tix?
e
_______________________________________________
vtcl-user mailing list
[EMAIL PROTECTED]
http://lists.sourceforge.net/mailman/listinfo/vtcl-user
att1.eml