how to make exe file

i done small script and it try to make exe file and it does
not  work.
After I warp the file with the gif file It create exe file
I run this file and I get :
Windows error in startup script
can't find package require tile
while executing
"package require tile"
{ file
c:/application/12.exe/lib/application/application/test/gui.t
cl}
invoked from within
"source $startup"
{ file c:/application/12.exe/main.tcl" line 18}
 
What I do wrong


package require tile
package require Iwidgets 4.0
package require tcom
package require BWidget
package require Tk


variable array reg
set ::list_reg_addres ""
set ::list_reg_addres ""
set ::onu1omci 0
set ::onu2omci 0


wm title . "BROADLIGHT E2E"
wm geometry . 750x570
frame .mbar -borderwidth 30 -relief raised

grid .mbar

set widgets(mainMenu) [menubutton .mbar.main -text
"Main" -menu
.mbar.main.m -relief raised]
grid .mbar.main  -in .mbar -row 1 -column 0
menu .mbar.main.m
.mbar.main.m add command -label "About..."
-command {.about activate}
.mbar.main.m add separator
.mbar.main.m add command -label "Quit" -command
tcl_exit

##=========================================================
##	Create a tabnotebook iwidget
##=========================================================
##

iwidgets::tabnotebook .tn 
                -tabpos n 
              	-width 750 
               	-height 570 
              -raiseselect true 
              -bevelamount 2 
              -tabborders true 
              -angle 0 
              -gap 0 
              -font {{tahoma bold} 10} 
              -padx 5 
              -pady 5 
              -margin 2 



foreach t {main OLT ONU1 ONU2 } {

	set tb($t) [.tn add -label " [string totitle $t]"
]
foreground white	-font {Helvetica 16 bold}
}

grid .tn  -in .mbar -row 2 -column 0


############################################333

rename exit tcl_exit
proc exit {{status 0}} {
    # do nothing
}
.tn select 0
 
#
#  add image to tab1
 set broad [image create photo -file "chip1.GIF"]
	label $::tb(main).broad -image $broad -bg white -fg white
	pack $::tb(main).broad







_______________________________________________
TDK mailing list
TDKlistserv.ActiveState.com

http://listserv.ActiveState.com/mailman/listinfo/tdk

Ran Hamami wrote:
> i done small script and it try to make exe file and it
does not  work.
> After I warp the file with the gif file It create exe
file
> I run this file and I get :
> Windows error in startup script
> can't find package require tile
	...

When wrapping, it is necessary to specify the packages that
you are 
going to be using with the script.  TclApp provides some
autoscanning of 
your scripts, but you package requirements were pretty well
listed at 
the top of your script.

Jeff
_______________________________________________
TDK mailing list
TDKlistserv.ActiveState.com

http://listserv.ActiveState.com/mailman/listinfo/tdk