Меню

[DRU]

Проблемка:
Есть текстовый файл, в котором содержатся данные типа:

"<Key>" "<Text>" "<Command>"
{
"<Key>" "<Text>" "<Command>"
{
"<Key>" "<Text>" "<Command>"
"<Key>" "<Text>" "<Command>"
}
"<Key>" "<Text>" "<Command>"
"<Key>" "<Text>" "<Command>"
}
Т.е. обыкновенное меню состоящее из нескольких элементов, каждый из которых может содержать другие элементы. Нужно: на основании этого файла создать визуальную менюшку, а также производить некоторые изменения и сохранять в файл в таком же виде. Не могу понять как создать структуру, на основании которой создавать меню.

[alibek]

Почитай про JSON.

[Денис]

Надо проверить, есть ли возможность создавать подменю во время исполнения, помнится, у меня не получалось. Это главное. Остальное не проблема, текст распарсить-то.

Есть мысля. Запитываем содержимым файла массив, состоящий из элементов пользовательского типа:

Код: Выделить всё

Type MyMenuArray
    mmaLevel as Long
    mmaKey as String
    mmaText as String
    mmaCommand as String
end type

затем мы делаем монтаж (банальный open close с get'ом и split'ом) и получаем в виде элементов массива что-то типа этого:

Код: Выделить всё

'mmaLevel mmaKey  mmaText     mmaCommand
'0       "0"      "File"      ""
'1       "1"      "New"       "CmdNew"
'2       "2"      "ProjectA"  "CmdA"
'2       "3"      "ProjectB"  "CmdB"
'2       "4"      "Text File" "CmdC"
'1       "5"      "-"         ""
'1       "6"      "Exit"      "CmdExit"
'0       "7"      "Edit"      ""
'1       "8"      "Cut"       "CmdCut"
'1       "9"      "Copy"      "CmdCopy"
'1       "10"     "Paste"     "CmdPaste"
'0       "11"     "?"         "CmdHelp"

Тут очень важно обратить внимание на то, что в mmaLevel у нас записывается уровень подменю (то что в текстовых файлах отбивается табом, либо заключается в конструкции begin..end).

Мне кажется все наглядно видно, если 0 значит создаем пункт в строке меню, если 1, то создаем в первой менюшке, если 2, то предыдущий 1 становится заголовком подменю, а этот и остальные помещаются в это подменю. если затем мы встречаем 1, то выходим из подменю и создаем следующий пункт в меню. если сразу встречаем 0, то значит выходим из всех меню и в строке добавляем новый пункт.

Воот. Пункты меню создаются на API (вот так, например). Sad but true. К сожалению, Controls.add не проканает. И массивы контролов тоже.

Или я чего-то не знаю

[iGrok]

Как нефиг делать.
CreateMenu, AppendMenu.

[Денис]

Примечание к моему предыдущему длинному посту:
mmaLevel увязываем с файлом так: каждая открывающая скобка, это +1, каждая закрывающая, это -1. Начинаем с 0, естественно.

А затем, процедура, в которой будет создаваться меню, будет четко идти по массиву от А до Я, и сравнивать текущее значение mmaLevel с предыдущим и вызывать соответствующие API.

Вариантов может быть несколько:
равно 0 - новое меню в строке меню
равно предыдущему - новый пункт меню
больше предыдущего на 1 - новое подменю из предыдущего пункта меню
больше предыдущего на >1 - ошибка
меньше предыдущего на 1 - выход из подменю и новый пункт меню
меньше предыдущего на >1 - рекурсивный выход из подменю, пока не получим предыдущее вхождение.

вот такой алгоритм.

[DRU]

Почитал про JSON, почитал ответы, спасибо. Даж не знал что есть гтовые решения))

[Денис]

Аааа!!! Большой брат следит за мной!

Как только я почитал про JSON, в тот же вечер мне на комп залилось это обновление native JSON feature in Internet Explorer 8!
Они знали!