04-03-2007, 09:49 PM
Still doesn't work, here is what I have for my itemeditor:
[code]
Public Sub ItemEditorInit()
'****************************************************************
'* WHEN WHO WHAT
'* ---- --- ----
'* 07/12/2005 Shannara Added gfx constant.
'****************************************************************
'App.Path
frmItemEditor.picPic.Picture = LoadPicture(App.Path & GFX_PATH & "items" & GFX_EXT)
frmItemEditor.txtName.Text = Trim(Item(EditorIndex).Name)
frmItemEditor.scrlPic.Value = (Item(EditorIndex).Pic)
frmItemEditor.cmbType.ListIndex = Item(EditorIndex).Type
' Npc(EditorIndex).Sprite = frmNpcEditor.scrlSprite.Value
If (frmItemEditor.cmbType.ListIndex >= ITEM_TYPE_WEAPON) And (frmItemEditor.cmbType.ListIndex = ITEM_TYPE_POTIONADDHP) And (frmItemEditor.cmbType.ListIndex = ITEM_TYPE_WEAPON) And (frmItemEditor.cmbType.ListIndex = ITEM_TYPE_POTIONADDHP) And (frmItemEditor.cmbType.ListIndex
[code]
Public Sub ItemEditorInit()
'****************************************************************
'* WHEN WHO WHAT
'* ---- --- ----
'* 07/12/2005 Shannara Added gfx constant.
'****************************************************************
'App.Path
frmItemEditor.picPic.Picture = LoadPicture(App.Path & GFX_PATH & "items" & GFX_EXT)
frmItemEditor.txtName.Text = Trim(Item(EditorIndex).Name)
frmItemEditor.scrlPic.Value = (Item(EditorIndex).Pic)
frmItemEditor.cmbType.ListIndex = Item(EditorIndex).Type
' Npc(EditorIndex).Sprite = frmNpcEditor.scrlSprite.Value
If (frmItemEditor.cmbType.ListIndex >= ITEM_TYPE_WEAPON) And (frmItemEditor.cmbType.ListIndex = ITEM_TYPE_POTIONADDHP) And (frmItemEditor.cmbType.ListIndex = ITEM_TYPE_WEAPON) And (frmItemEditor.cmbType.ListIndex = ITEM_TYPE_POTIONADDHP) And (frmItemEditor.cmbType.ListIndex