[A83] Re: Making TileMap Editor - VB

[Prev][Next][Index][Thread]

[A83] Re: Making TileMap Editor - VB


At 08:19 PM 10/26/2001 -0400, you wrote:

>Hey, I'm new to the mailing list, but you know my friend Darkfire139.
>
>I am making a tilemap editor in VB.
>
>(I know a lot more VB thatn Darkfire does)
>
>I've been working for awhile and already have the following features:
>
>
>
>Sprite (Tile) Editor (Currently only 8x8 sprites, but with work I could make
>it edit other sizes also)
>
>A list with icons of the sprites to choose from (add to it from sprite
>editor) (soon I will make remove, rename and edit)
>
>Add tile to map from list (map is only 8x12 but I am going to make it custom
>sized)
>
>
>You select a tile on the map and then click the "Add >" button to add the
>selected tile to the map
>
>Soon to come, I will make the map generator and all the other features.
>If someone could give me some ideas for features, that would be helpful.
>
>Please give me comments and suggestions,
>
>I have a screenshot at this URL:
>http://colinz80stuff.tripod.com/tileedit.gif
>and another at this:
>http://colinz80stuff.tripod.com/tileedit2.gif

If you use a ListBox to store sprite data (not too complex, just have one 
box for names with Visible=True and another with the byte string for the 
sprites with Visible=False) then you can use the ListBox methods .Add and 
.Remove and the properties .List and .ListIndex to make a fairly versatile 
system.

Sub cmdRemove_Click()
         if MsgBox("Really remove?",vbYesNo,"Remove?")=vbNo then Exit Sub
         lstNames.Remove lstNames.ListIndex
         lstSprites.Remove lstNames.ListIndex
End Sub

Sub cmdRename_Click()
         lstNames.List(lstNames.ListIndex)=InputBox("Enter new name.")
End Sub
References: