Меню, Основные вехи создания Опции

[Трампл]

Здраствуйте, пользователи, администраторы и модераторы данного сайта. Пишу вам письмо с целью получения полной развёрнутой информации по вышеописанной теме. Всё из-за того, что уж очень мне хочется создать хорошее меню. Те, кто в состояние дать дельный совет... Того я заранее благодарю.

[Turboworld]

Простое вертикальное меню.

Этапы:
1. Создаешь структуру типа запись (запись будет олицетворять пункт меню) вида
Флаг_курсора:byte {0 или 1, 1 - данный пункт подсвечен, 0 - нет},
Идентификатор_пункта:integer {ID самого пункта - что будем использовать в условных операторах},
Название_пункта: String

2. Делаешь массив этих записей.. [1..n] - где n - кол-во пунктов меню...
3. Собсна выводишь делаешь цикл типа REPEAT
Внутри у него выводишь меню циклом FOR подсвечивая при этом пункт, на котором стоит курсор (Флаг_курсора=1).
В этом же цикле (repeat) считываешь клавишу (стрелки, Enter) и в зависимости от этого - либо переходишь на выполнение еще одной итерации (цикла REPEAT) - но уже подсвечивая другой пункт. Либо, если нажат Enter - тогда принимаешь ввод (Идентификатор_пункта, у которого Флаг_курсора=1)

;)