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

Reply via email to