Golf Posted April 20, 2015 Author Share Posted April 20, 2015 Well,as I can see for me bmp pictures have better quality than jpeg ones.This is just short tutorial in which I will explain you how to replace .jpg pictures with .bmp ones in frmMain and frmMenu GUI.All we need to do is copy go to modGeneral and copy whole sub:```Public Sub loadGUI(Optional ByVal loadingScreen As Boolean = False)```Now open Eclipse Toolkit 3.0 - You can download it [here](http://www.eclipseorigins.com/index.php?/topic/136889-et-30-eclipse-toolkit-30/)In Eclipse Toolkit open Source Editor and in Code paste copied sub:Then in Replace box paste this : ```.jpg```And in With box paste this:```.bmp```Now click replace button any copy code you got.Replace loadGui sub in modGeneral with copied code from Eclipse Toolkit.REMEMBER : You need to have .bmp images in gui folder (Main and Menu) also you need to have .bmp bars :)THATS ALL!If you are using EO 2.0 it should be like this (withouth any source adds)```Public Sub loadGUI(Optional ByVal loadingScreen As Boolean = False)Dim i As Long ' if we can't find the interface On Error GoTo errorhandler ' loading screen If loadingScreen Then frmLoad.Picture = LoadPicture(App.Path & "\data files\graphics\gui\menu\loading.bmp") Exit Sub End If ' menu frmMenu.Picture = LoadPicture(App.Path & "\data files\graphics\gui\menu\background.bmp") frmMenu.picMain.Picture = LoadPicture(App.Path & "\data files\graphics\gui\menu\main.bmp") frmMenu.picLogin.Picture = LoadPicture(App.Path & "\data files\graphics\gui\menu\login.bmp") frmMenu.picRegister.Picture = LoadPicture(App.Path & "\data files\graphics\gui\menu\register.bmp") frmMenu.picCredits.Picture = LoadPicture(App.Path & "\data files\graphics\gui\menu\credits.bmp") frmMenu.picCharacter.Picture = LoadPicture(App.Path & "\data files\graphics\gui\menu\character.bmp") ' main frmMain.Picture = LoadPicture(App.Path & "\data files\graphics\gui\main\main.bmp") frmMain.picInventory.Picture = LoadPicture(App.Path & "\data files\graphics\gui\main\inventory.bmp") frmMain.picCharacter.Picture = LoadPicture(App.Path & "\data files\graphics\gui\main\character.bmp") frmMain.picSpells.Picture = LoadPicture(App.Path & "\data files\graphics\gui\main\skills.bmp") frmMain.picOptions.Picture = LoadPicture(App.Path & "\data files\graphics\gui\main\options.bmp") frmMain.picParty.Picture = LoadPicture(App.Path & "\data files\graphics\gui\main\party.bmp") frmMain.picItemDesc.Picture = LoadPicture(App.Path & "\data files\graphics\gui\main\description_item.bmp") frmMain.picSpellDesc.Picture = LoadPicture(App.Path & "\data files\graphics\gui\main\description_spell.bmp") frmMain.picTempInv.Picture = LoadPicture(App.Path & "\data files\graphics\gui\main\dragbox.bmp") frmMain.picTempBank.Picture = LoadPicture(App.Path & "\data files\graphics\gui\main\dragbox.bmp") frmMain.picTempSpell.Picture = LoadPicture(App.Path & "\data files\graphics\gui\main\dragbox.bmp") frmMain.picShop.Picture = LoadPicture(App.Path & "\data files\graphics\gui\main\shop.bmp") frmMain.picBank.Picture = LoadPicture(App.Path & "\data files\graphics\gui\main\bank.bmp") frmMain.picTrade.Picture = LoadPicture(App.Path & "\data files\graphics\gui\main\trade.bmp") frmMain.picHotbar.Picture = LoadPicture(App.Path & "\data files\graphics\gui\main\hotbar.bmp") ' main - bars frmMain.imgHPBar.Picture = LoadPicture(App.Path & "\data files\graphics\gui\main\bars\health.bmp") frmMain.imgMPBar.Picture = LoadPicture(App.Path & "\data files\graphics\gui\main\bars\spirit.bmp") frmMain.imgEXPBar.Picture = LoadPicture(App.Path & "\data files\graphics\gui\main\bars\experience.bmp") ' main - party bars For i = 1 To MAX_PARTY_MEMBERS frmMain.imgPartyHealth(i).Picture = LoadPicture(App.Path & "\data files\graphics\gui\main\bars\party_health.bmp") frmMain.imgPartySpirit(i).Picture = LoadPicture(App.Path & "\data files\graphics\gui\main\bars\party_spirit.bmp") Next ' store the bar widths for calculations HPBar_Width = frmMain.imgHPBar.width SPRBar_Width = frmMain.imgMPBar.width EXPBar_Width = frmMain.imgEXPBar.width ' party Party_HPWidth = frmMain.imgPartyHealth(1).width Party_SPRWidth = frmMain.imgPartySpirit(1).width Exit Sub' let them know we can't load the GUIerrorhandler: MsgBox "Cannot find one or more interface images." & vbNewLine & "If they exist then you have not extracted the project properly." & vbNewLine & "Please follow the installation instructions fully.", vbCritical DestroyGame Exit SubEnd Sub``` 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