#***********************************************************************
#     DISPLAYED WITH PERMISSION OF ROY SCOTT ENTERPRISES
#     AND THE AUTHOR AS AN ARCHIVING FUNCTION
#                  http://www.scottserver.net/forum/index.php
#     ALL RIGHTS RESERVED
#************************************************************************
#     MINOR EDITING PERFORMED BY UPLA STAFF
#************************************************************************

#royscott

 Posted: Mon Jun 21, 2004 4:14 am    Post subject: Problem with example file   

--------------------------------------------------------------------------------
 
I am having a problem with the provided sample file "sbtest.tmc". When I tried to compile it, I got all sorts of parse errors and no output. I found that by declaring the string variable for the status bar and changing the double quotes in the string variable assignment to the status bar to single quotes, the file would compile successfully. However there is no status bar on the window when run. I have been unable so far to determine why. 

Here is some modified sample code that seems to accomplish the same purpose as the sbtest.tmc:
 
Code: 

-------------------------------------------------------

?WINDOW new, 100, 100, 600, 350. 
{new>$Caption$}="Status Bar Test Window". 
{new>$StatusBar$} = "Single Item Status Bar". 
@SetEvent {new>!OnClose!}: Halt. 
@SetEvent {new>!OnClick!}: NoOperation. 
@ShowWindow {new}. 
@WaitEvent. 
{new>$StatusBar$} = "Item1|100|Item2|200|Item3: rest of window|" 
    + %ScreenWidth%. 
@WaitEvent. 
End. 

------------------------------------------------------------------

Click anywhere in the window to change the status bar, on the X in the upper right corner for an immediate exit from the program.