| Rus |
| Отправлено: 06.02.2005, 15:43 |
|
Не зарегистрирован
|
2. Люди, подскажите, как мне создать динамически PopupMenu с SubMenu. С созданием простой сруктуры меню без подмешюшек проблем не возникает.
|
|
| HKarel |
| Отправлено: 06.02.2005, 18:45 |
|
Не зарегистрирован
|
Вот пример, возможно, это то что тебе надо:
| CODE |
for ( int i = 1; i < ListSchemes->Count; i++ )
{
TMenuItem *NewItem = new TMenuItem( mnuAddInSceme );
NewItem->Caption = ListSchemes->Items( i )->SchemeName;
NewItem->Tag = reinterpret_cast< int >( ListSchemes->Items( i ) );
NewItem->ImageIndex = 1;
NewItem->OnClick = mnuSchemeClick;
mnuAddInSceme->Add( NewItem );
}
|
|
|
|
