Home Gadgetman Forum Book Reviews Links Contact me X-UFO
Gadgets Processors Programming School Old news
Before you can begin to add a Toolbar you must place this line in the beginning of your OPL file:
INCLUDE "toolbar.oph"

Now you should add some variables:

   GLOBAL ScrWid%      rem pixel width initially
   GLOBAL ScrHght%      rem pixel height initially

And insert values in them:
(Add this to your First procedure)

   ScrWid%=gWidth
   ScrHght%=gHeight

Now you must include a module:

   loadm "z:\system\opl\Toolbar"

Let the Module create it's own GLOBAL variables...
(Let this line be the last in the procedure. The control will NOT return here)

   TBarLink:("eventloop")   REM 'links' toolbar globals 
                            REM and then calls eventloop
This last part assumes that the next PROC is called eventloop:
<< >>
<<User friendliness>>
<<2. Adding the tools>>