4 * [Generated from wimp, 25 September 1996]
7 #if !defined(__CC_NORCROFT) || !defined(__arm)
8 #error You must use the Norcroft ARM Compiler for Sapphire programs
11 #pragma include_only_once
12 #pragma force_top_level
21 /*----- Overview ----------------------------------------------------------*
31 /* --- wimp_init --- *
33 * On entry: R0 == pointer to application name
37 * Use: Initialises the WindowManager, and stores away useful
38 * snippets of information, like the task handle we've been
39 * given. It also registers an exit handler so that the Wimp
43 extern routine wimp_init;
45 /* --- wimp_taskHandle --- *
49 * On exit: R0 == the application's task handle
51 * Use: Returns the application's task handle.
54 extern routine wimp_taskHandle;
56 /* --- wimp_version --- *
60 * On exit: R0 == the WIMP's version number (may not be the one the
63 * Use: Returns the WindowManager's version number.
66 extern routine wimp_version;
68 /* --- wimp_strWidth --- *
70 * On entry: R0 == pointer to a string
72 * On exit: R0 == width of the string in OS units
74 * Use: Returns the width of a string, as it would be displayed in
75 * an icon (i.e. taking into account things like the current
76 * desktop font etc.) The width is exact, so if you want to
77 * e.g. draw a box round it, you'll have to add on a little
78 * clearance at each end. 8 OS units seems to be a good size
79 * for the clearance (so the total width you'd use is given by
80 * wimp_strWidth(string)+16, because it has two ends).
83 extern routine wimp_strWidth;
85 /*----- That's all, folks -------------------------------------------------*/