Convert TextFieldText to Int?

The forum is locked. These are the original blitzbasic.com forums, kept so they can still be read. No new topics, replies or edits can be made here. To join in, head over to the Blitz3D+ forums.

tonyg

Is this what you're after :

SuperStrict
Import maxgui.drivers 'If you use the SVN version of MaxGUI. Comment it out if you don't
Local MyWindow:TGadget=CreateWindow("TextField Example", 200,200,320,240)
Local Label0:TGadget=CreateLabel("Number:",10,10,100,20,MyWindow)
Local Label1:TGadget=CreateLabel("You have keyed in:",10,40,200,40,MyWindow)

Local MyInput:TGadget=CreateTextField(110,10,180,20,MyWindow)


Repeat
  WaitEvent()
  Select EventID()
  Case EVENT_WINDOWCLOSE
     End
  Case EVENT_GADGETACTION
	Local textin:String=TextFieldText(MyInput)
	Local int_text:Int=Int(textin)
    SetGadgetText(Label1,"You have keyed in:"+ int_text)
   End Select
Forever