locked
I need a lot of help RRS feed

  • Question

  • I am trying to make my own browser with the Data extension pack but I can figure out how to do like a Controls.LastButtonclicked and Controls.Buttonclick! And I would like to give credit to litdev and Demonicdan for their code.


    GameWindow.Height = Desktop.Height
    GameWindow.Width = Desktop.Width
    GameWindow.BackgroundColor = "Black"
    GameWindow.Show()
    GameWindow.Title = "Computer Standard"
    Web = "http://www.MSN.com/"
    GameWindow.WindowState = "Maximized"
    Browser = GameControls.AddWebBrowser(0, 0, GameWindow.Width, GameWindow.Height - 40, Web)
    WebBar = GameControls.AddTextBox("About;Blank", GameWindow.Width - 1224,GameWindow.Height -35, 700, 30)
    Enter = GameControls.AddButton("Enter" GameWindow.Width - 514, GameWindow.Height-35, 100, 30)
    Zoom_Control_Bar = GameControls.AddSlider(100,GameWindow.Width - 120,GameWindow.Height - 30,100,20)
    GameControls.RegisterValueChangedEvent(Zoom_Control_Bar,"Zoom_Set")
    Sub Browsing
      Browsing()
      If GameControls.GetText(Enter) = "Enter" Then
        website = GameControls.GetText(WebBar)
        Web = website
      Endif
      EndSub
    Sub Zoom_Set
      value = GameControls.GetValue(Zoom_Control_Bar)
      scale = value/100
      width = scale*GameWindow.Width
      height = scale*(GameWindow.Height - 40)
      posX = (GameWindow.Width - width)/2
      posY = ((GameWindow.Height - 40) - height)/2
      GameControls.Move(Browser,posX,posY,0)
      GameControls.SetSize(Browser,width,height)
    EndSub
    
      

    Tuesday, March 27, 2012 10:49 PM

Answers

  • See  another "I need a lot of help"
    Wednesday, March 28, 2012 1:04 AM
    Answerer