SUBSIM: The Web's #1 resource for all submarine & naval simulations since 1997 |
|
|
Thread Tools | Display Modes |
07-31-09, 12:15 PM | #31 |
The Old Man
|
Holy mama.... I bet you didn't do that by hand. Do you by any chance still have the code for entering the data into a table? Would be veeery useful . Right now I have to enter all of the data by hand and it's quite annoying. Also, when I move a menu group, I don't need to update just that item, but all of the items, since the Zone line's X and Y position is absolute . Maybe a tool to update the file automatically...But for the moment, that's beyond me. It took me one day to write this macro to renumber the items (hsie's tool didn't work for me for some reason). It's for a simple form with one button (btnRenumber) and one text box (txtPage). It renumbers the items on a page (as long as the item is in the correct page ofc).
Private Sub btnRenumber_Click() Dim iItem As Integer Dim myRange As Range If txtPage.Value = vbNullString Then MsgBox "You must enter the Menu Page" ElseIf Application.Documents.Count < 1 Then MsgBox "No document Opened" Else iItem = 1 Set myRange = ActiveDocument.Range(Start:=0, End:=ActiveDocument.Content.End) myRange.Select With Selection.Find .Forward = True .Wrap = wdFindStop .Text = "[" + txtPage.Value + " I" Do While .Execute Selection.Extend Selection.Extend Selection.Extend Selection.TypeText Text:="[" + UCase(txtPage.Value) + " I" + CStr(iItem) + "]" iItem = iItem + 1 Set myRange = ActiveDocument.Range(Start:=Selection.End, End:=ActiveDocument.Content.End) myRange.Select Loop End With End If End Sub Come to think of it, I don't understand why there was never a tool to visually mod the interface. VB has plugins to view DDS and TGA, a piece of code could make a table with all the items and parameters in the menu.ini file, then show them. Appying the inverse formulas might allow you to drag/move items. There are maximum 200 items on a page so that shouldn't crash the pc. The Display line might be an issue, but... Actually forget it, it might take longer to do it than to mod the file by hand . |
Thread Tools | |
Display Modes | |
|
|