Computer Science Canada :: View topic

i tried the

code:

get hello..

it doesnt work..
is there any other way of doing it..without any vulanability..

okay
i got the import GUI thing working...but one problem
the background for it is White..or w.e set it..how can i make it transparent or an image...so it shows that image...rather then covering the whole screen with white???????
this is how the register page looks So far [fine i am posting it :p ]
Posted Image, might have been reduced in size. Click Image to view fullscreen.

Posted Image, might have been reduced in size. Click Image to view fullscreen.

i wnat the GUI form to be there...but when i put it i get a WHITE screen with that form..here is the code

code:

var nameTextField, addressTextField : int % The Text Field IDs.

procedure NameEntered (text : string)
GUI.SetSelection (addressTextField, 0, 0)
GUI.SetActive (addressTextField)
end NameEntered

procedure AddressEntered (text : string)
GUI.SetSelection (nameTextField, 0, 0)
GUI.SetActive (nameTextField)
end AddressEntered

var quitButton := GUI.CreateButton (52, 5, 100, "Quit", GUI.Quit)
nameTextField := GUI.CreateTextFieldFull (50, 70, 100, "",
NameEntered, GUI.INDENT, 0, 0)
addressTextField := GUI.CreateTextFieldFull (50, 40, 100, "",
AddressEntered, GUI.INDENT, 0, 0)
var nameLabel := GUI.CreateLabelFull (45, 70, "Name", 0, 0,
GUI.RIGHT, 0)
var addressLabel := GUI.CreateLabelFull (45, 40, "Address", 0, 0,
GUI.RIGHT, 0)
loop
exit when GUI.ProcessEvent
end loop

GUI.Dispose (quitButton)

Text.Locate (maxrow - 1, 1)

Thanks