Click above to get retro games delivered to your door ever month!

  Using the Library:
 ----------------------------------------------------------------------------

 TSDWIN is simply linked in as any other library at link time.

    eg., RTLINK FI MYAPP LIB TSDWIN

 It may be added as a line in your .LNK file in the normal way.
 TSDWIN is written in Clipper 5.01, 8086 Assembler and Microsoft C
 5.1.

 TSDWIN is a granular library. Only those functions called will be
 linked in. The library is written using the pseudo-object
 programming method available with Clipper 5.01 and adds about 24K
 to an application when used in its most basic form.

 There is now a small root library, TSDROOT.LIB which contains some
 assembler code which some have found difficulty overlaying. It may
 be linked RESIDENT or put in the root with Blinker.

 The following examples describe the various linking processes:

    RTLINK:

            OUTPUT WINDEMO.EXE
            VERBOSE
            RESIDENT
            LIB TSDROOT
            DYNAMIC
            FI WINDEMO
            LIB TSDWIN

    BLINKER:

            OUTPUT WINDEMO.EXE
            VERBOSE
            BLINKER INCREMENTAL OFF
            LIB TSDROOT
            BEGINAREA
                    FI WINDEMO
                    ALLOCATE TSDWIN
                    ALLOCATE EXTEND
            ENDAREA


 Some of the larger functions in TSDWIN may be configured any way
 you wish.  You may want to consider making yourself a  'box'  in
 which to put the function call, as  we do in our own applications.
 For instance, one client wants all his Message boxes centered on
 the screen with only one message line in the box. In this case we
 define a function called 'AskUser( cString, cTitle, aChoices )'
 which is the only call in the entire application to our
 twButtonBox() function. All the client's defaults, such as the
 colour, frame type, shadow and position, are defined in the
 AskUser Function. In this way, you never have to remember the
 fairly long list of parameters which go with a function like
 twButtonBox(). Such practices ensure consistency, and also link
 the LIB function only once. Here is an example:

    FUNCTION AskUser( aChoices, cQuestion, cTitle )
    LOCAL nRetVal, nRowAdd := INT( LEN( cQuestion ) / ( 66 - 13 ))

    DEFAULT aChoices TO { "Yes", "No" },;
            cQuestion TO "Proceed?"

    RETURN ( twButtonBox( "H", cQuestion, cTitle,, ;
                 aChoices,, 6, 13, 12 + nRowAdd, 66, 3, 8 ))