LGM EvuGUI v1.00
By Anben Panglose (C)opyright 2001.

    Introduction
    How to use EvuGUI?
    Reference manual
    Making an application for Evulgo
    Used variables and constants description
    Contact infos

Introduction

Welcome and thank you for your interest in EvuGUI. What is EvuGUI? Well, I am making a shell named Evulgo (a sort of graphical user interface which helps you organize programs and manipulating files...) . You have downloaded the GUI that Evulgo will use, (EvuGUI) now you can make your own GUI under Qbasic with simple statements... This documentation explain how to use the routines. If you find any bugs, please contact me and I'll try to make something. By the way, please excuse my english, I speak french :)
Although every effort has been made to insure the accuracy of the material in this guide, LGM Labs, Anben panglose assume no responsibility for errors or omissions. In addition no liability is assumed for damages resulting from the use of the information contained herein.

How to use EvuGUI?

First some infos on the Lib:
EvuGUI was made under QBX 7.1 (PDS), I don't think it will work under QB45, I will make a compatible version later...
EvuGUI was made using the Future library from http://qbasic.qb45.com , so you will need this library if you plan to modify the source code. To minimize the size of the Lib, I've used only 2 groups of the routines included in the Future lib: Svga > Mouse And Xms routines. Just load the EvuGUI.qlb to start making your program.

ex: Qbx /l Evugui.qlb

After loading the library in memory, open one the Sample.bas included to make your app.
And don't forget to call the InitGUI sub before doing anything.

Reference manual

FUNCTION XmsLoadFont% (Fil$)

Usage: Load a font file in the Xms Memory, so that you can use it to print something on the screen.

Variable description:
Fil$ = Path and name of the Font file to load, the font file is in the Evulgo format .enf)

Syntax example: Verdana% = XmsLoadfont("Fonts\Verdana.enf")

See also: Evufont, Lenght

FUNCTION Length% (XmsFontHandle%, Text$, Style)

SUB Evufont (xd%, yd%, Text$, Style, BYVAL C&, Xmshand%)

Usage: Print a string on the screen

Variable description:
xd% = X position
yd% = Y position
Text$ = The string to print
Style = The style of the string to, Style = 1, then the string is printed in bold.
C& = The color of the string to print
Xmshand% = the xms handle of the font which will be used to print the string, see XmsLoadfont.

Syntax example: Evufont 100, 100, "This is a test, do you like Deathwish (Police)?", 1, 4, Verdana%
For an example please see the Font.bas file included with this package.

Before using this routine, make sure to load a font in the Xms memory first!

See also: Length, XmsLoadfont

Syntax example: This function works in a loop, just like the Dir$ function:
a$ = "Hello word, this is a testing string, we have to make it a bit long so that you can see that it works, by the way, excuse my english, I speak french!"
DO
  Sentence$ = WordWrap$(a$, 200, Verdana%, 0)
LOOP UNTIL Sentence$ = ""

FUNCTION ExistCharacterInString% (Lookin$, Lookfor$)

Usage: Determine if a character(s) exist somewhere in a string

Variable description:
Lookin$ = String to look in
Lookfor$ = a character, or a list or characters to search for (Lookfor$ = "f", will serah for the f letter, Lookfor$ = "abcd" will serach first for the a letter, then for the b letter... if either one of the letter is found the the function return the True value...

Syntax example: IsthereYorJ = ECIS("Hello, how are you?") (value returned = True)

Variable description:
Number% = Number of Icons you want to load, more you want load, more memory you will need

Value returned: The handle of the IconBank in the Xms memory, use it with any routines which need the IcoHandle parameter.

Don't forget to delete the IcoBank before exiting your program with the DeallocateXms routine.
See the Icon.bas example for more informations.

See also: LoadInIcoBnk, DrawFromIcoBnk, DrawIcon

Variable description:
IcoBankHandle% = Handle of the Icon Bank in the xms memory (see CrtIcoBnk)
Index% = The index in the bank of the icon you want to draw.
If Index% < 0 or Index% > Prepared room, you will get a "Out of Bound" error, (see CrtIcoBnk)
X% = X position to draw
Y% = Y position to draw

This method is much more faster that DrawIcon because it uses the Ram memory, not the Hdd.
See the Icon.bas example for more informations.

See also: CrtIcoBnk, LoadInIcoBnk, DrawIcon

Usage: Put on the screen a icon from a storage media such as the hdd. Much more slower that the DrawFromIcoBnk routine.

See also: CrtIcoBnk, LoadInIcoBnk, DrawFromIcoBnk

Usage: draw a 3d horizontal line

Variable description:
X% = X pos
y% = Y Pos
w% = width
c1& = light color
c2& = dark color

you can use c1& = 8 and c2& = 15

See Icon.bas for example. If X or Y = -1 then X or Y will be recalculated so as to center the button on the screen. If IcoHandle = 0 then no icon will be drawn. If Cpt$ = "^cHeCk^" (case sentitive) then a check will be drawn instead of the text with the CptColor& Color (this feature is used by EvuGUI)
Here are the different style available at this time:

Variable description:
HotSpot = LeftBottom
X = Xpos
y = Ypos
W = width
H = Height
Cpfont = Handle of the font (See XmsLoadfont)
CptColor& = Color of the title
Cptstyle = Style of the title
Caption$ = Title of the window
Style% = Style of the window
Here are the available style at this stage: (Style 1 and 2)

Usage: Replacement of the native input, it's a textbox

Variable description:
Id% = The Unique Id for this control (unique id for all the text box in the current loop)
Hotspot = LeftBottom
x% = X pos
y% = Y pos
W% = width
TextFont = Font handle for the text (See XmsloadFont)
TextColor& = Color of the text
TextStyle = Style of the text (1 = Bold)
Text$ = Variable that holds the text
Max% = the maximum characters that the user can enters
TipFont = Font handle for the tootip (See XmsLoadfont)
Tipcol& = color of the tip
TipStyle = Style of the tip (1 = Bold)
tip$ = tooltip that appear when the mouse is left over the textbox
ShowedText$ = variable that holds the text currently displayed

Syntax:
This control must be used in a loop
By giving a value to Text$ before calling the function and before Done = True, the textbox will have a default text in it: Text$
To see what I am talking about, see the TextBox.bas example.
For more Information about the Done varaible, please see Used variables and constants

Value returned: If the Textbox was validated ([Enter] pressed, or clicked away) then True is returned

FUNCTION OptB% (ID, X, Y, CptFont, CptColor&, CptStyle, Caption$, TipFont, TipColor&, TipStyle, Tip$, Array() AS OPTIONBOX)

Usage: If you have several options, but only one can be selected at once, then this control is for you. It's an option Box

Variable description:
Id% = Unique option Id within the same loop
x% = Xpos
y% = Ypos
CptColor& = Caption color
CptFont = Font Handle which contains the fontdata which will be used to print the caption
CptStyle = Style of the caption (1 = Bold)
TipFont = Font handle for the tootip (See XmsLoadfont)
Tipcol& = color of the tip
TipStyle = Style of the tip (1 = Bold)
Caption$ = Caption of the control (Text)
Tip$ = ToolTip which will appear if the mouse is left on the control
Array() = An Optionbox array (See Used variables and constants)

Value returned: If the Control was clicked then True is returned

Syntax: This control must be used in a loop. See the Option.bas example.

SUB Mtip (ID, X, Y, W, H, CptFont, CptColor&, CptStyle, Tip$)

Usage: test if the mouse stays in a predefined area (rectangle) for a predefined period, then show a tooltip

Variable description:
Id = a unique Mtip id within a loop
X% = X pos (LeftBottom)
y% = y pos (LeftBottom)
w% = width of the rectangle (area)
h% = height of the area (rectangle)
CptFont = Font Handle which contains the fontdata which will be used to print the tip (See XmsLoadFont)
CptColor& = Tip color
CptStyle = Style of the Tip (1 = Bold)
tip$ = tooltip to display

Must be used in a loop, please see Mtip.bas for more example.

FUNCTION ChKB% (ID, X, Y, CptFont, CptStyle, CptColor&, Caption$, TipFont, TipColor&, TipStyle, Tip$, Value)

Usage: If you have severals options that can be selected all at once then you need checkboxes

Variable description:
Id% = Unique CheckBox Id within a loop
X% = Xpos (LeftBottom)
y% = Ypos (LeftBottom)
Caption$ = Text to display nex to the checkbox
CptColor& = Caption color
CptFont = Font Handle which contains the fontdata which will be used to print the caption
CptStyle = Style of the caption (1 = Bold)
TipFont = Font handle for the tootip (See XmsLoadfont)
Tipcol& = color of the tip
TipStyle = Style of the tip (1 = Bold)
Tip$ = Tooltip that will be showed if the mouse is left on the checkbox
ValueHolder% = Variable that will hold the status of the CheckBox (TRue or False)

See CheckBox.bas for more infos.

FUNCTION Cmdbtn% (ID, X, Y, W, H, Cpt$, CptColor&, CptFont, CptStyle, TipFont, Tipcol&, TipStyle, Tip$, IcoBankHandle, IcoIndex, Layout, EvuMbStyle)

Usage: Create a Command button (3d button which is "clickable")

Variable description:
ID = Unique Button Id within the loop
Hotspot = LeftBottom
X% = Xpos
Y% = Ypos
W% = width
h% = Height
Cpt$ = Caption (Text on the button)
CptColor& = Caption color
CptFont = Font Handle which contains the fontdata which will be used to print the caption
CptStyle = Style of the caption (1 = Bold)
TipFont = Font handle for the tootip (See XmsLoadfont)
Tipcol& = color of the tip
TipStyle = Style of the tip (1 = Bold)
Tip$ = Tooltip
IcoBankhandle% = handle of the icon bank which contains the icon to draw on the button (See Btn)
IcoINdex% = index in the iconbank of the ico to be drawn (See Btn)
Layout = same as btn
BtnStyle = Style of the CmdBtn (for now only STyle 1 is available)

See Cmdbtn.bas for more informations.

Used variables and constants

Description of constants and variables used by EvuGUI:

The EvuGUIVariables are not useful for the programmer, it's for EvuGUI.

The Btn Routine use the following type to draw 3d buttons, to understand here is the structure of a 3d button:

Each border refers to a color variable in the BtnBorderColors type variable

TYPE BtnBorderColors
    Black AS LONG     (See the image)
    White AS LONG
    Dark AS LONG
    Light AS LONG
    Fill AS LONG
    Indent AS INTEGER   (When a button is pressed, the caption fo the button is slightly moved to get a real 3d effect, the indent variable is the value of this motion.)
END TYPE

If you need to get any of the parameter within your program, read InitGUI

Before using the GUI, you must Use the InitGUI routine.

Other type:
TYPE OPTIONBOX
    X AS INTEGER             Xpos of the option box
    Y AS INTEGER             Ypos of the option box
    Value AS INTEGER      Status of the option box (True/False)
    OptLast AS INTEGER   'Used by EvuGUI
END TYPE

The Done Variable:
This variable is very important, if true, it tels EvuGUI that the current loop has been "looped" one time, so there's no need to redraw all the controls which works in a loop, Example:

DO
    [controls]
Done = True
LOOP

If The "Done = True" line is omitted then all the control will be redrawn in the loop...
If You want a complete example using the main routines of EvuGUI v1.00, run Demo.bas

Contact infos

You can contact me by:

• Email: lgm@intnet.mu
• Icq: 47192465

Visit my Website: http://lgmlabs.8m.com and let me have your feedback!

By Anben Panglose for LGM Labs (C)opyright 2001.