|
Command |
Description |
Example |
|
mousewhere(var
x,y,button:int) |
Used
to get current information about the mouse |
Mouse.Where(x,y,button) |
|
buttonchoose
(choice:string) |
Used
to change from “singlebutton” to “multibutton” Left
= 1 Right
= 100 Both
= 101 No
Button=0 |
buttonchoose(“multibutton”) |
|
buttonwait
(motion:string, var x, y, buttonnumber, buttonupdown:int) |
Gets
information about a mouse event and removes it from the queue. The parameter motion must be one of
“up”,”down”, ”updown”,”downup” x,y
is the location of the mouse cursor when it is pressed. buttonnumber (multibutton) left
= 1 middle
= 2 right
= 3 The
parameter buttonupdown is set to 1 if button pressed and 0 when released. |
Example
to be given in class and saved as buttonwait example in your h:\ |
|
buttonmoved(motion:string):boolean |
Indicates
whether there is a mouse event of the appropriate type. Returns true if event is in the queue,
false if it is not. |
|
|
Font.New(fontSelectStr:string):int |
Used
to obtain font for drawing. The
parameter format is “Family:Size:Style” |
var
fontID:int FontID:=Font.New(“vector:20X12”) Or FontID:=Font.New(“serif:18:Bold,Italic”) |
|
Font.Draw(txtString:string,x,y,fontID,Color:int) |
Used
to actually draw text in a specified font. Does not affect cursor location or
background. |
Font.Draw("Hi
There",15,10,fontID,3)" |
|
Font.Free(fontID:int) |
Used
to release font. |
Font.Free(fontID) |