CodeBase - Pseudo Windows Style Window + GUI System

Information

Uploaded: 29th Dec 2003 14:47

Modified: 29th Dec 2003 15:16

Author:  andrew11

Summary

Windows-Style Windows and GUI System

Full Description

Example Use:<br /> <br /> At the top, call setupgui()<br /> Every loop you must call refreshgui()<br /> <br /> <br /> WINDOWS<br /> <br /> Windownum = createwindow()<br /> <br /> List of window properties<br /> x as integer<br /> y as integer<br /> exist as boolean<br /> height as integer<br /> width as integer<br /> title as string<br /> titlecolor as integer<br /> titlecolor2 as integer<br /> titlecolorinactive as integer<br /> titlecolorinactive2 as integer<br /> titletextcolor as integer<br /> bodycolor as integer<br /> shadowcolor as integer<br /> lightcolor as integer<br /> hide as boolean<br /> preventmovewind as boolean<br /> preventresize as boolean<br /> preventclose as boolean<br /> preventminimize as boolean<br /> preventmaximize as boolean<br /> maximized as boolean<br /> minimized as boolean<br /> open as boolean<br /> <br /> Windows are fully customizeable, with seperae colors each.<br /> <br /> Use:<br /> window(windownum).propety<br /> Replace property with one from list above to change/return a value<br /> <br /> GUI FIELDS (form fields)<br /> <br /> fieldnum = createfield(type, subtype)<br /> <br /> List of field types / subtypes<br /> Pushbutton / Normal, Imagelabel<br /> Togglebutton / Normal, Imagelabel<br /> inputbox / text_string, password, pos_integer, pos_real, norm_integer, norm_real<br /> listbox / normal<br /> slider / vertical, horizontal<br /> label / normal<br /> radio / normal, selected<br /> picture / normal<br /> tooltip / normal<br /> <br /> List of Field Properties:<br /> x as integer<br /> y as integer<br /> exist as boolean<br /> height as integer<br /> width as integer<br /> hide as boolean<br /> bodycolor as integer<br /> shadowcolor as integer<br /> lightcolor as integer<br /> textcolor as integer<br /> disabledtextcolor as integer<br /> intvalue as integer<br /> strvalue as string<br /> label as string<br /> maintype as byte<br /> subtype as byte<br /> disabled as boolean<br /> window as integer<br /> length as byte<br /> mouseout as boolean<br /> mouseover as boolean<br /> click as boolean<br /> release as boolean<br /> group as byte<br /> selected as boolean<br /> listbox as byte<br /> selectedcolor as integer<br /> optionheight as byte<br /> normalimage as integer<br /> clickimage as integer<br /> spritenum as integer<br /> clip as boolean<br /> time as integer<br /> stime as integer<br /> show as boolean<br /> delay as integer<br /> outline as integer<br /> <br /> Use:<br /> field(fieldnum).property<br /> replace property with one from list to change, or return a value<br /> <br /> To place a field inside a window:<br /> field(fieldnum).window = windownum<br /> <br /> Special Use: LISTBOX<br /> <br /> fieldnum = createfield(listbox, normal)<br /> listboxnum = field(fieldnum).listbox<br /> a = addoption(listboxnum, Optionname$)<br /> b = addoption(listboxnum, Optionname$)<br /> removeoption(listboxnum, a) :`Removes option a (1)<br /> removeoption(listboxnum, 0) :`Removes all options (0)<br /> <br /> listbox(listboxnum, 0).optionselected :`Returns selected option<br /> listbox(listboxnum, optionnum).optionname :`Returns option name