Создание в диалоговом окне выпадающего списка

[Maxim Gorbunov]

Создание в диалоговом окне выпадающего списка (ComboBox)
Предположим, что нам необходимо в диалоговом окне, создающемся во время выполнения программы, создать выпадающий список. Решается эта задача следующим образом.

Dialog MyDialog = new Dialog("Мой диалог");

DialogField MyFieldDialog;

............

MyFieldDialog = MyDialog.addField(typeid (enum_list), "myfield");

MyFieldDialog.value(enum_list::Element1);

............

MyDialog.run();

В первой строке создается диалог с именем MyDialog и заголовком «Мой диалог». Во второй строке объявлена переменная, которая будет использоваться для доступа к элементу управления выпадающий список. Далее, в третьей строке, мы добавляем в MyDialog этот элемент управления (метод addField возвращает значение типа DialogField, которое может использоваться для доступа к добавленному элементу). enum_list является типом данных вида Base Enum и содержит строки выпадающего списка. В строке номер 4 выбор в этом списке устанавливается на Element1 (это одно из значений типа enum_list). В последней строке выбранный диалог запускается. Он рисуется на экране, и программа останавливается (то есть управление не идет дальше строки №5) до тех пор, пока диалог не будет завершен.

Антон Скоробогатов

[Горбунов Дмитрий]

Всем привет!

Предлагаю аналогичный вариант только не обязательно привязываться к конкретному ENUMу (можно работать с произвольным массивом данных):

static void SuperJob(Args _args)
{
    Dialog              dialog;                 //Окно
    DialogField         DF;                     //Поле
    object              ctrlGroup;
    int                 i;
    str                 a[];
    ;
    a[1]='35 Вт'; a[2]='50 Вт'; a[3]='60 Вт'; a[4]='75 Вт'; a[5]='100 Вт';

    dialog      = new Dialog("Типы ламп накаливания");

    DF  =  Dialog.addField(Types::ENUM, "Лампочки");

    ctrlGroup      = DF.fieldControl();

    // Указываем количество объектов в выпадающем списке
    ctrlGroup.items(5);

    // Заполняем выпадающий список
    for (i=1;i<=5;i++)
    {
        ctrlGroup.item(i);
        ctrlGroup.text(a[i]);
    }
    if((dialog.Run() && dialog.ClosedOk()))
    {
    }
}

[Пагер Маяковский]

Макс! Спасибо! Очень пригодилось!