Zarnick123 Posted July 25, 2010 Author Share Posted July 25, 2010 Working on changing around my GUI, Simple as That. I want to make it so the Four items currently equipped to the player are displayed on the white bar under health.![](http://www.freemmorpgmaker.com/files/imagehost/pics/3c4dc66dd997d95fb6d8e55e3624c26a.png) Link to comment Share on other sites More sharing options...
emblem Posted July 25, 2010 Share Posted July 25, 2010 Change Sub BltEquipment so that it draws to the equipment picturebox.Change EqLeft and EqTop in ModConstants to be the top/left of where you want the drawing to start. (From the looks of it: 0, 0). Link to comment Share on other sites More sharing options...
Robin Posted July 25, 2010 Share Posted July 25, 2010 Make sure the picturebox autoredraws. Link to comment Share on other sites More sharing options...
Zarnick123 Posted July 25, 2010 Author Share Posted July 25, 2010 messing around with that nowā¦ hope i know what im doing lol Link to comment Share on other sites More sharing options...
Zarnick123 Posted July 25, 2010 Author Share Posted July 25, 2010 Must be doing something wrong i changed the bltequipment sub and i think the modconstants but nothing is changing even on full compile Link to comment Share on other sites More sharing options...
Zarnick123 Posted July 25, 2010 Author Share Posted July 25, 2010 okay its workingā¦ but for some reason it is showing both icons of the image. the one which would apear on the ground and the one in equips. both frames. Link to comment Share on other sites More sharing options...
emblem Posted July 25, 2010 Share Posted July 25, 2010 Uh. Post your BltEquipment sub. That's odd.. Link to comment Share on other sites More sharing options...
Zarnick123 Posted July 25, 2010 Author Share Posted July 25, 2010 nah i fixed that part. nother prob though. when i click the item on the pic it wont unequip and im not getting the Description when i hover over it. but i transfered the conde from the char menu Link to comment Share on other sites More sharing options...
emblem Posted July 25, 2010 Share Posted July 25, 2010 @The:> nah I fixed that part. nother prob though. when I click the item on the pic it wont unequip and im not getting the Description when I hover over it. but I transfered the conde from the char menuSo you copied the code from these into the proper events for the equipment picturebox?```Private Sub picCharacter_Click()Ā Ā Dim EqNum As LongĀ Ā EqNum = IsEqItem(EqX, EqY)Ā Ā If EqNum <> 0 ThenĀ Ā Ā Ā SendUnequip EqNumĀ Ā End IfEnd SubPrivate Sub picCharacter_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)Ā Ā Dim EqNum As LongĀ Ā Dim x2 As Long, y2 As LongĀ Ā EqX = XĀ Ā EqY = YĀ Ā EqNum = IsEqItem(X, Y)Ā Ā If EqNum <> 0 ThenĀ Ā Ā Ā y2 = Y + picCharacter.Top - frmMainGame.picItemDesc.height - 2Ā Ā Ā Ā x2 = X + picCharacter.Left + 2Ā Ā Ā Ā UpdateDescWindow GetPlayerEquipment(MyIndex, EqNum), 0, x2, y2Ā Ā Ā Ā LastItemDesc = GetPlayerEquipment(MyIndex, EqNum) ' set it so you don't re-set valuesĀ Ā Ā Ā Exit SubĀ Ā End IfĀ Ā picItemDesc.Visible = FalseĀ Ā LastItemDesc = 0 ' no item was last loadedEnd Sub```If not, do that and change these lines to reflect your equipment picturebox:```Ā Ā Ā Ā y2 = Y + picCharacter.Top - frmMainGame.picItemDesc.height - 2Ā Ā Ā Ā x2 = X + picCharacter.Left + 2``` Link to comment Share on other sites More sharing options...
Zarnick123 Posted July 26, 2010 Author Share Posted July 26, 2010 this is quite wierd. im only getting the desc window all the way in the top left corner of the bar. Link to comment Share on other sites More sharing options...
Robin Posted July 26, 2010 Share Posted July 26, 2010 Make sure everything is set to 'pixel'. Link to comment Share on other sites More sharing options...
Murdoc Posted September 14, 2010 Share Posted September 14, 2010 Hi Zarnick. If you get this working would you mind showing me how? I'm stuck on how to do this properly.. Link to comment Share on other sites More sharing options...
Murdoc Posted September 14, 2010 Share Posted September 14, 2010 @Robin:> Make sure everything is set to 'pixel'.What exactly do you mean RobinĀ "set to 'pixel'" I'm tryin to learn vb6 atm, but i'm still pretty n00bish. Link to comment Share on other sites More sharing options...
Robin Posted September 15, 2010 Share Posted September 15, 2010 Go make your own thread. Link to comment Share on other sites More sharing options...
Murdoc Posted September 15, 2010 Share Posted September 15, 2010 @Robin:> Go make your own thread.lol, nevermind I figured out :p 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