Small Basic/Visual Basic Help pls!

0 favourites
  • 5 posts
From the Asset Store
Game with complete Source-Code (Construct 3 / .c3p) + HTML5 Exported.
  • Hey guys as you have mybie seen from from my last post I am still noob,

    But I am getting the hang of it a bit.

    I am busy crateing an new download manager, so far so good.

    but there is one problem, everyting works, but why does

    If(downloadlistgo = 1) Then

    GraphicsWindow.Clear()

    Downloadlisttext = Network.GetWebPageContents("http://dl.dropbox.com/u/37148455/Download%20list.txt")

    downloadlistgo = downloadlistgo -1

    EndIf

    Not working correctly!

    here is the full code, pls help!

    GraphicsWindow.Show()

    'Start of layout

    newsx =-0

    newsy =-0

    downloadlistgo = 0

    News = Network.GetWebPageContents("http://dl.dropbox.com/u/37148455/News.txt")

    GraphicsWindow.Drawtext(newsx, newsy, News)

    'Download List setup

    DownloadlistW = 110

    DowbloadlistH = 30

    DownloadlistX = GraphicsWindow.Width - 110

    DownloadlistY = GraphicsWindow.Height - 30

    GraphicsWindow.MouseDown = handleClick

    GraphicsWindow.BrushColor = "Gray"

    GraphicsWindow.FillRectangle(DownloadlistX, DownloadlistY,DownloadlistW, DowbloadlistH)

    GraphicsWindow.DrawRectangle(DownloadlistX, DownloadlistY,DownloadlistW, DowbloadlistH)

    GraphicsWindow.BrushColor = "Black"

    GraphicsWindow.DrawText(DownloadlistX + 10, Downloadlisty + 7, "Download list")

    'Download list in action

    Sub handleClick

    xpos = GraphicsWindow.MouseX

    ypos = GraphicsWindow.MouseY

    If(xpos > Downloadlistx And xpos < (DownloadlistX + DownloadlistW)) Then

        If(ypos > Downloadlisty And ypos < (DownloadlistY + DowbloadlistH)) Then

          downloadlistgo = downloadlistgo + 1

        EndIf

    EndIf

    EndSub

    If(downloadlistgo = 1) Then

    GraphicsWindow.Clear()

    Downloadlisttext = Network.GetWebPageContents("http://dl.dropbox.com/u/37148455/Download%20list.txt")

    downloadlistgo = downloadlistgo -1

    EndIf

  • I think you should rather find a forum about small/visual basic and post your question up there.

    Even for the "open topics", this is really out of scope and seem totally out of topic.

  • Unless you were to do something like that in CC, which is actually doable.

  • Try Construct 3

    Develop games in your browser. Powerful, performant & highly capable.

    Try Now Construct 3 users don't see these ads
  • Thanks guys!

Jump to:
Active Users
There are 1 visitors browsing this topic (0 users and 1 guests)