Source Code Form Issues

Discussion in 'Questions (Windows Mobile)' started by Louis, Jun 16, 2007.

  1. Louis

    Louis Active Member Licensed User

    Hi,
    Yesterday as I added a new MenuItem to my form from within Basic4ppc, the 46th item I believe it was it seems to have messed up internally my .sbp file. Not my source code, but the forms basic4ppc was pre-programmed to add after a save. When I access the IRC and Chat windows from the Designer menu, or try to, I get a NullReferenceException, and an ArgumentOutOfRangeException. Here's what the file has so far, and what the designer sub looks like:
    version
    5.00
    3
    sounds
    IRC
    chat
    irc
    4
    3
    0
    0
    0
    0
    0
    0
    0
    0
    0
    6
    65
    0
    1
    1
    3
    0
    0
    0
    238
    268

    1
    Hardware.dll
    4
    BinaryFile.dll
    HTTP.DLL
    Network.dll
    Hardware.dll
    5
    client:Client
    request:WebRequest
    stream:BinaryFile
    response:WebResponse
    hardware:Hardware
    Sub designer


    addform(sounds,"Sounds and Notifications ","",211,211,211)@
    addopendialog(sounds,Opensound,95,95,Sound Files|*.wav)@
    addbutton(sounds,SaveAndExit,95,95,75,23,"Save And Exit",212,208,200,0,0,0,True,True,9)@
    addbutton(sounds,selectnewsound,95,95,75,23,"Select New Sound",212,208,200,0,0,0,True,True,9)@
    addbutton(sounds,playsound,95,95,75,23,"Play",212,208,200,0,0,0,True,True,9)@
    addlistbox(sounds,filestoplay,95,95,80,50,"",255,255,255,0,0,0,True,True,0,9)@
    addlistbox(sounds,soundoptions,95,95,80,50,"",255,255,255,0,0,0,True,True,0,9)@
    addform(IRC,"Internet Relay Chat","",245,245,245)@
    addarraylist(irc,topics,95,95,80,25)@
    addarraylist(irc,people,95,95,80,25)@
    addlistbox(irc,rooms,95,95,80,50,"",255,255,255,0,0,0,True,True,0,9)@

    addmenuitem(irc,favorites,"Favorites",True,False)@r
    addmenuitem(favorites,RemoveAServer,"Remove A Server",True,False)@r
    addmenuitem(favorites,addaserver,"Add A Server",True,False)@r
    addmenuitem(favorites,logonserver,"Log Onto Server",True,False)@r
    addmenuitem(irc,SoundsSet,"Set Sounds/Notifications",True,False)@r
    addmenuitem(irc,irchelpmenu,"Help/Registration",True,False)@r
    addmenuitem(irchelpmenu,Helpmenu1,"Help",True,False)@r
    addmenuitem(helpmenu1,whatsnew,"What's New",True,False)@r
    addmenuitem(helpmenu1,intro,"Introduction",True,False)@r
    addmenuitem(helpmenu1,gettingstarted,"Getting Started",True,False)@r
    addmenuitem(helpmenu1,RoomsHelp,"The Chat Rooms",True,False)@r
    addmenuitem(roomshelp,joiningChat,"Joining A Listed Room",True,False)@r
    addmenuitem(roomshelp,JoinHidden,"Creating A Room",True,False)@r
    addmenuitem(helpmenu1,TCWHelp,"The Chat Window",True,False)@r
    addmenuitem(tcwhelp,ChattersHelp,"Chatting",True,False)@r
    addmenuitem(tcwhelp,ProgoamOptionsHelp,"Program Options",True,False)@r
    addmenuitem(helpmenu1,ExitHelp,"Exitting The Program",True,False)@r
    addmenuitem(helpmenu1,AboutIRC,"About This Program",True,False)@r
    addmenuitem(irchelpmenu,irchelp,"Register This Client",True,False)@ End Sub addform(chat,"Chat","",211,211,211)@
    addsavedialog(chat,SaveLog,95,95,ASCII Text|*.txt)@
    addlistbox(chat,participants,95,95,80,50,"",255,255,255,0,0,0,True,True,0,9)@
    addmenuitem(chat,ProgramOptions,"Program Options",True,False)@r
    addmenuitem(programoptions,ignoremenu,"Ignore",True,False)@r
    addmenuitem(ignoremenu,IgnoreUser,"Ignore User Incoming Messages",True,False)@r
    addmenuitem(ignoremenu,ignoreexcept,"Ignore Everyone Except",True,False)@r
    addmenuitem(programoptions,SavedLog,"Save Logs",True,True)@r
    addmenuitem(programoptions,saveIgnore,"Save Ignored Lists",True,False)@r
    addmenuitem(programoptions,nosounds,"Stop Sounds for Now",True,False)@r
    addmenuitem(chat,ControlChar,"Hold Down Control",True,False)@r
    addmenuitem(chat,AppExit,"Exit Program",True,False)@
    addform(irc,"Internet Relay Chat","",211,211,211)@
    End Sub
    @EndOfDesignText@
    Now I know the IRC window appears twice so I will remove the lowercased "irc" control, but even without it I still get those errors when trying to access the "IRC" and "chat" forms from the Designer menu. What should I do? To do a 43.7 KB of code over again would be a pain, but do you suggest something like copying just the code to another .sbp file and redoing the forms? Or can I insert and/or delete something in the pre-programmed text to make it all better? Thank you all for your help, I really do appreciate it!
     
  2. Erel

    Erel Administrator Staff Member Licensed User

    Try to remove the 'r' characters at the end of some of the lines (after the '@').
     
  3. Louis

    Louis Active Member Licensed User

    Hi Erel, I got all of the weird R'S out of the way, but I still get the same errors. Here's what the internals look like now:
    version
    5.00
    2
    sounds
    IRC
    chat
    4
    3
    0
    0
    0
    0
    0
    0
    0
    0
    0
    6
    65
    0
    1
    1
    3
    0
    0
    0
    238
    268

    1
    Hardware.dll
    4
    BinaryFile.dll
    HTTP.DLL
    Network.dll
    Hardware.dll
    5
    client:Client
    request:WebRequest
    stream:BinaryFile
    response:WebResponse
    hardware:Hardware
    Sub designer


    addform(sounds,"Sounds and Notifications ","",211,211,211)@
    addopendialog(sounds,Opensound,95,95,Sound Files|*.wav)@
    addbutton(sounds,SaveAndExit,95,95,75,23,"Save And Exit",212,208,200,0,0,0,True,True,9)@
    addbutton(sounds,selectnewsound,95,95,75,23,"Select New Sound",212,208,200,0,0,0,True,True,9)@
    addbutton(sounds,playsound,95,95,75,23,"Play",212,208,200,0,0,0,True,True,9)@
    addlistbox(sounds,filestoplay,95,95,80,50,"",255,255,255,0,0,0,True,True,0,9)@
    addlistbox(sounds,soundoptions,95,95,80,50,"",255,255,255,0,0,0,True,True,0,9)@
    addform(IRC,"Internet Relay Chat","",245,245,245)@
    addarraylist(irc,topics,95,95,80,25)@
    addarraylist(irc,people,95,95,80,25)@
    addlistbox(irc,rooms,95,95,80,50,"",255,255,255,0,0,0,True,True,0,9)@
    addmenuitem(irc,favorites,"Favorites",True,False)@
    addmenuitem(favorites,RemoveAServer,"Remove A Server",True,False)@
    addmenuitem(favorites,addaserver,"Add A Server",True,False)@
    addmenuitem(favorites,logonserver,"Log Onto Server",True,False)@
    addmenuitem(irc,SoundsSet,"Set Sounds/Notifications",True,False)@
    addmenuitem(irc,irchelpmenu,"Help/Registration",True,False)@
    addmenuitem(irchelpmenu,Helpmenu1,"Help",True,False)@
    addmenuitem(helpmenu1,whatsnew,"What's New",True,False)@
    addmenuitem(helpmenu1,intro,"Introduction",True,False)@
    addmenuitem(helpmenu1,gettingstarted,"Getting Started",True,False)@
    addmenuitem(helpmenu1,RoomsHelp,"The Chat Rooms",True,False)@
    addmenuitem(roomshelp,joiningChat,"Joining A Listed Room",True,False)@
    addmenuitem(roomshelp,JoinHidden,"Creating A Room",True,False)@
    addmenuitem(helpmenu1,TCWHelp,"The Chat Window",True,False)@
    addmenuitem(tcwhelp,ChattersHelp,"Chatting",True,False)@
    addmenuitem(tcwhelp,ProgoamOptionsHelp,"Program Options",True,False)@
    addmenuitem(helpmenu1,ExitHelp,"Exitting The Program",True,False)@
    addmenuitem(helpmenu1,AboutIRC,"About This Program",True,False)@
    addmenuitem(irchelpmenu,irchelp,"Register This Client",True,False)@ End Sub addform(chat,"Chat","",211,211,211)@
    addsavedialog(chat,SaveLog,95,95,ASCII Text|*.txt)@
    addlistbox(chat,participants,95,95,80,50,"",255,255,255,0,0,0,True,True,0,9)@
    addmenuitem(chat,ProgramOptions,"Program Options",True,False)@
    addmenuitem(programoptions,ignoremenu,"Ignore",True,False)@
    addmenuitem(ignoremenu,IgnoreUser,"Ignore User Incoming Messages",True,False)@
    addmenuitem(ignoremenu,ignoreexcept,"Ignore Everyone Except",True,False)@
    addmenuitem(programoptions,SavedLog,"Save Logs",True,True)@
    addmenuitem(programoptions,saveIgnore,"Save Ignored Lists",True,False)@
    addmenuitem(programoptions,nosounds,"Stop Sounds for Now",True,False)@
    addmenuitem(chat,ControlChar,"Hold Down Control",True,False)@
    addmenuitem(chat,AppExit,"Exit Program",True,False)@

    End Sub
    @EndOfDesignText@
    Any thoughts? Thanks again for everything.
     
  4. Erel

    Erel Administrator Staff Member Licensed User

    Please send me the file and I'll check it.
     
Loading...
  1. This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
    By continuing to use this site, you are consenting to our use of cookies.
    Dismiss Notice