Whackeddie99 Posted January 8, 2012 Share Posted January 8, 2012 FrmMain…click on the bottom side of the program, and it shows something like this:/\||\/Then drag it down till u see it! Link to comment Share on other sites More sharing options...
theobjop Posted January 8, 2012 Share Posted January 8, 2012 Thx but now I can't find Private/Public Sub UpdateDescWindow?? Link to comment Share on other sites More sharing options...
Whackeddie99 Posted January 9, 2012 Share Posted January 9, 2012 ctrl f then search for it.Can Anyone help me? Gold does not show a window for unknown reason! Or I mean currency! Link to comment Share on other sites More sharing options...
Joyce Posted January 9, 2012 Share Posted January 9, 2012 I read through the code, and found these lines within 10 seconds..```'no DescWindow for currency If Trim$(Item(itemnum).Type) = 7 Then  Exit Sub End If```THERE's your problem. Link to comment Share on other sites More sharing options...
Whackeddie99 Posted January 9, 2012 Share Posted January 9, 2012 oh damn I completely missed that. Now I feel like a moron. Thanks…(refer to this picture for my face expression: [http://media.tumblr.com/tumblr_lp7cjsg2N01qcx0d3.jpg](http://media.tumblr.com/tumblr_lp7cjsg2N01qcx0d3.jpg)) Link to comment Share on other sites More sharing options...
handsomenicor Posted January 14, 2012 Share Posted January 14, 2012 What game engine do you use in that screenshot?please give me the link! Link to comment Share on other sites More sharing options...
_Her0 Posted January 14, 2012 Share Posted January 14, 2012 Its a modified version of Eclipse Origins, he modified it himself. Besides, it would be against the rules for him to post a link to another engine publicly. Link to comment Share on other sites More sharing options...
wito35 Posted March 15, 2012 Share Posted March 15, 2012 Nice dude! Thanks :D Link to comment Share on other sites More sharing options...
Wart Posted March 31, 2012 Share Posted March 31, 2012 Thanks for the tutorial, works fine! Link to comment Share on other sites More sharing options...
zenmen Posted April 12, 2012 Share Posted April 12, 2012 Hi im a begginer with vb6 and i have a question how to add this lables?```Private Sub SOMETHING()lblItemSpeedlbl... etc.Exit Sub```or maybe just paste it somewhere? Link to comment Share on other sites More sharing options...
Ruins of Hell Posted April 12, 2012 Share Posted April 12, 2012 @zenmen:> Hi im a begginer with vb6 and i have a question how to add this lables?> > ```> Private Sub SOMETHING()> > lblItemSpeed> lbl... etc.> > Exit Sub> ```> or maybe just paste it somewhere?When you open the client in VB6 there's a toolbox on the right which contains everything you can put into the project. Near the top the guide details all the labels you must add. Link to comment Share on other sites More sharing options...
zenmen Posted April 12, 2012 Share Posted April 12, 2012 Ok, more or less I already know what it is, but when I try there is not possible to start the game from the compiler, vb6 tell me that my problem is with ".Caption" in line (and i think in others will be too):```.lblItemDesc.Caption = Trim$(Item(itemnum).Desc)```i chech two times my labels names.. What can be wrong?@Edit.Its a liiiiive! Ok i now i have no problem, its working! : ) Link to comment Share on other sites More sharing options...
or3o Posted May 2, 2012 Share Posted May 2, 2012 thanks for an easy to follow tutorial! Link to comment Share on other sites More sharing options...
DarkDino Posted May 6, 2012 Share Posted May 6, 2012 NICE :D!. Link to comment Share on other sites More sharing options...
bestthaibb Posted June 25, 2012 Share Posted June 25, 2012 but i got some problem its i cant find the code "Public Sub UpdateDescWindow" its show that does not have it?i think i did by the step already but still can find Public Sub UpdateDescWindow dont know why and how! bcz i also using EO2.0 Link to comment Share on other sites More sharing options...
Bryce Campbell Posted July 12, 2012 Share Posted July 12, 2012 Where do i add the labels at? Link to comment Share on other sites More sharing options...
JohnPony Posted July 13, 2012 Share Posted July 13, 2012 in picItemDesc Link to comment Share on other sites More sharing options...
rex510 Posted July 13, 2012 Share Posted July 13, 2012 For anyone wondering you could also do this in reverse quite easy and have all the labels red to begin with and then have the ones you do meet the requirements on change colour. Link to comment Share on other sites More sharing options...
Dawntide Posted July 30, 2012 Share Posted July 30, 2012 Hey,there was not enough space for my item descriptions, so i made the GUI Picture larger. The problem now is, that the Item Desc Picturebox goes off the screen on top.I recognized a off screen check in there:```' check for off-screen  If y + frmMain.picItemDesc.height > frmMain.ScaleHeight Then    y = frmMain.ScaleHeight - frmMain.picItemDesc.height  End If```But it does not work, how to fix it, so i the whole picture box is on the screen. Link to comment Share on other sites More sharing options...
FlatlanD Posted August 12, 2012 Share Posted August 12, 2012 Where is this line "Public Sub UpdateDescWindow" ? Link to comment Share on other sites More sharing options...
Ariel Posted August 13, 2012 Share Posted August 13, 2012 Ctrl+ F make sure search in whole source is check. Link to comment Share on other sites More sharing options...
FlatlanD Posted August 14, 2012 Share Posted August 14, 2012 Thanks, finally I found it :) Link to comment Share on other sites More sharing options...
FlatlanD Posted August 16, 2012 Share Posted August 16, 2012 So I have the problem, on currency it shows item type is weapon and other items it also show wrong type and on enchant this table don't show. What's wrong? Link to comment Share on other sites More sharing options...
or3o Posted August 24, 2012 Share Posted August 24, 2012 This can work with eo3.0 if your replace 'render the item part with this``` frmMain.picItemDescPic.Refresh ```and flatland your problem is because you added more equipment slots. to fix it you need to replace this part```Select Case Item(itemnum).TypeCase 0 ' None.lblitemType.Caption = "ETC"Case 1 ' Weapon.lblitemType.Caption = "Weapon".lblitemspeed.Caption = ATS & "s".lblStat.Caption = "STR: +" & STR & vbCrLf & "END: +" & ENDu & vbCrLf & "INT: +" & INTe & vbCrLf & "AGI: +" & AGI & vbCrLf & "WILL: +" & WILL.lblDMG = "Damage: " & DMGCase 2 ' Armor.lblitemType.Caption = "Armor".lblitemspeed.Caption = "".lblStat.Caption = "STR: +" & STR & vbCrLf & "END: +" & ENDu & vbCrLf & "INT: +" & INTe & vbCrLf & "AGI: +" & AGI & vbCrLf & "WILL: +" & WILL.lblDMG = "" 'show armorCase 3 ' Helmet.lblitemType.Caption = "Helmet".lblitemspeed.Caption = "".lblStat.Caption = "STR: +" & STR & vbCrLf & "END: +" & ENDu & vbCrLf & "INT: +" & INTe & vbCrLf & "AGI: +" & AGI & vbCrLf & "WILL: +" & WILL.lblDMG = "" 'show armorCase 4 ' Shield.lblitemType.Caption = "Shield".lblitemspeed.Caption = "".lblStat.Caption = "STR: +" & STR & vbCrLf & "END: +" & ENDu & vbCrLf & "INT: +" & INTe & vbCrLf & "AGI: +" & AGI & vbCrLf & "WILL: +" & WILL.lblDMG = "" 'show armorCase 5 ' orange.lblitemType.Caption = "Consume"Case 6 ' orange.lblitemType.Caption = "Key"Case 7 ' orange.lblitemType.Caption = "Currency"Case 8 ' orange.lblitemType.Caption = "Spell Scroll"End Select```with this```Select Case Item(itemnum).TypeCase 0 ' None.lblitemType.Caption = "ETC"Case 1 ' Weapon.lblitemType.Caption = "Weapon".lblitemspeed.Caption = ATS & "s".lblStat.Caption = "STR: +" & STR & vbCrLf & "END: +" & ENDu & vbCrLf & "INT: +" & INTe & vbCrLf & "AGI: +" & AGI & vbCrLf & "WILL: +" & WILL.lblDMG = "Damage: " & DMGCase 2 ' Armor.lblitemType.Caption = "Armor".lblitemspeed.Caption = "".lblStat.Caption = "STR: +" & STR & vbCrLf & "END: +" & ENDu & vbCrLf & "INT: +" & INTe & vbCrLf & "AGI: +" & AGI & vbCrLf & "WILL: +" & WILL.lblDMG = "" 'show armorCase 3 ' Helmet.lblitemType.Caption = "Helmet".lblitemspeed.Caption = "".lblStat.Caption = "STR: +" & STR & vbCrLf & "END: +" & ENDu & vbCrLf & "INT: +" & INTe & vbCrLf & "AGI: +" & AGI & vbCrLf & "WILL: +" & WILL.lblDMG = "" 'show armorCase 4 ' LEGS.lblitemType.Caption = "Legs".lblitemspeed.Caption = "".lblStat.Caption = "STR: +" & STR & vbCrLf & "END: +" & ENDu & vbCrLf & "INT: +" & INTe & vbCrLf & "AGI: +" & AGI & vbCrLf & "WILL: +" & WILL.lblDMG = "" 'show armorCase 5 ' BOOTS.lblitemType.Caption = "Boots".lblitemspeed.Caption = "".lblStat.Caption = "STR: +" & STR & vbCrLf & "END: +" & ENDu & vbCrLf & "INT: +" & INTe & vbCrLf & "AGI: +" & AGI & vbCrLf & "WILL: +" & WILL.lblDMG = "" 'show armorCase 6 ' Gloves.lblitemType.Caption = "Gloves".lblitemspeed.Caption = "".lblStat.Caption = "STR: +" & STR & vbCrLf & "END: +" & ENDu & vbCrLf & "INT: +" & INTe & vbCrLf & "AGI: +" & AGI & vbCrLf & "WILL: +" & WILL.lblDMG = "" 'show armorCase 7 ' RING.lblitemType.Caption = "Ring".lblitemspeed.Caption = "".lblStat.Caption = "STR: +" & STR & vbCrLf & "END: +" & ENDu & vbCrLf & "INT: +" & INTe & vbCrLf & "AGI: +" & AGI & vbCrLf & "WILL: +" & WILL.lblDMG = "" 'show armorCase 8 ' ENCHANT.lblitemType.Caption = "Enchant".lblitemspeed.Caption = "".lblStat.Caption = "STR: +" & STR & vbCrLf & "END: +" & ENDu & vbCrLf & "INT: +" & INTe & vbCrLf & "AGI: +" & AGI & vbCrLf & "WILL: +" & WILL.lblDMG = "" 'show EnchantCase 9 ' Shield.lblitemType.Caption = "Shield".lblitemspeed.Caption = "".lblStat.Caption = "STR: +" & STR & vbCrLf & "END: +" & ENDu & vbCrLf & "INT: +" & INTe & vbCrLf & "AGI: +" & AGI & vbCrLf & "WILL: +" & WILL.lblDMG = "" 'show armorCase 10 ' orange.lblitemType.Caption = "Consume"Case 11 ' orange.lblitemType.Caption = "Key"Case 12 ' orange.lblitemType.Caption = "Currency"Case 13 ' orange.lblitemType.Caption = "Spell Scroll"End select``` Link to comment Share on other sites More sharing options...
Dawntide Posted August 26, 2012 Share Posted August 26, 2012 How to fix the offscreen code?the description window is too large for the default window size, so items in the first few rows in your inventory are cut off by the screensize on top. Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now