Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.07.17;
Скачать: [xml.tar.bz2];

Вниз

Popupmenu в runtime   Найти похожие ветки 

 
AndrewVolkov   (2003-07-06 22:20) [0]

Доброго вечера
Никто не сталкивался с такой задачей, как добавление новых Items в PopupMenu в процессе выполнения программы?

К примеру у меня есть Add, Edit, Delete. Попап привязан к гриду и в зависимости от выделенного в гриде я хочу добавить какой-нибудь новый итем. Как это возможно сделать?

Спасибо.


 
Романов Р.В.   (2003-07-06 22:29) [1]

Если пункты меню заранее известны, добавь их сразу в меню, привяжи к TAction и у ненужных пунктов выставляй Visible в False


 
AndrewVolkov   (2003-07-06 22:37) [2]

Заранее они неизвестны к сожалению


 
Романов Р.В.   (2003-07-06 22:49) [3]

MyMenuItem := TMenuItem.Create(Self);
MyMenuItem.Caption := "NewItem";
PopupMenu1.Items.Add(MyMenuItem);


 
Ученик   (2003-07-06 22:55) [4]

Есть еще
function NewItem(const ACaption: string; AShortCut: TShortCut; AChecked, AEnabled: Boolean; AOnClick: TNotifyEvent; hCtx: THelpContext; const AName: string): TMenuItem;


 
AndrewVolkov   (2003-07-06 23:03) [5]

Спасибо, енто оказывается было очень просто...



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.07.17;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.01 c
14-55801
Intell
2003-06-24 15:41
2003.07.17
Что, Windows 98 умер?


14-55849
hex_for_gold
2003-06-30 00:42
2003.07.17
Нужно срочно пример простейшего чата на IdTCPServer and IdTCPclie


1-55511
EgorKA
2003-07-04 17:01
2003.07.17
Изменение размеров формы с borderstyle=bsNone...


3-55419
Relaxxx
2003-06-24 10:20
2003.07.17
Как выделить програмно нужные строки в DBGrid


1-55604
MakNik
2003-07-02 18:00
2003.07.17
MDIChildren





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский