Подцепить объект к меню

293

01 сентября 2003 года

586 / / 06.10.2002

Как подцепить пункту меню объект.
У меня создаеться динамически меню. Вот и надо подцепить объек который бы однозначно определял что делать при выборе. Сейчас у меня сделано через Ж... - по Caption определяю что запускать.

Подписаться на вопросНеобходима регистрация

По порядку

Сначала полезные

Сначала решения

5 ответов

0 спам

2.1K

01 сентября 2003 года

maximaximax

83 / / 05.06.2003

Цитата:

Originally posted by SEDEGOFF
Как подцепить пункту меню объект.
У меня создаеться динамически меню. Вот и надо подцепить объек который бы однозначно определял что делать при выборе. Сейчас у меня сделано через Ж... - по Caption определяю что запускать.

Используй ActionList и Actions

Цитировать

0 спам

293

01 сентября 2003 года

SEDEGOFF

586 / / 06.10.2002

Раскажи по подробней . У меня зарание не извесно количество пунктов меню и пожтому действие одно которое и определяет в каком виде грузить форму. То есть зарание я создать события не могу

Цитировать

0 спам

2.1K

01 сентября 2003 года

maximaximax

83 / / 05.06.2003

Цитата:

Originally posted by SEDEGOFF
Раскажи по подробней . У меня зарание не извесно количество пунктов меню и пожтому действие одно которое и определяет в каком виде грузить форму. То есть зарание я создать события не могу

А что у тебя в этом меню?
Идея с Actions в том чтобы делать не один обработчик нажатий в котором нужно будет разбирать код, а разные обработчики которые сами уже знают что делать.

Свернуть исходник

Код:

void __fastcall AddItem(

    TMenu *mnu,

    const AnsiString &strItemName,

    TAction *act,

    int iPosition)

{

    TMenuItem *mit(dynamic_cast<TMenuItem *>(

        mnu->Owner->FindComponent(strItemName)));

    if (!mit) {

        mit = new TMenuItem(mnu->Owner);

        mnu->Items->Insert(iPosition, mit);

        mit->Name = strItemName;

        if (act) {

            mit->Action = act;

        } else {

            mit->Caption = "-";

        }

    }

}