Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.03.27;
Скачать: CL | DM;

Вниз

Popup Menu   Найти похожие ветки 

 
Checist [root]   (2005-03-12 12:08) [0]

Программно добавляю итем в PopupMenu, как привязать на его событие OnClick выполнение процедуры ExecProc


 
Navi   (2005-03-12 12:28) [1]

procedure TForm1.ExecProc(Sender: TObject);
begin
 ShowMessage((Sender as TMenuItem).Caption);
end;

procedure TForm1.Button1Click(Sender: TObject);
var
 MenuItem: TMenuItem;
begin
 MenuItem:= TMenuItem.Create(PopupMenu1);
 MenuItem.Caption:= "New Item Caption";
 MenuItem.OnClick:= ExecProc;
 PopupMenu1.Items.Add(MenuItem);
end;



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

Текущий архив: 2005.03.27;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.036 c
3-1109240962
salexn
2005-02-24 13:29
2005.03.27
Сравнение структур 2-х баз данных


1-1110459740
Aleks
2005-03-10 16:02
2005.03.27
какой компонент нужно использовать???


6-1106827836
AlexG
2005-01-27 15:10
2005.03.27
Проблема с установкой callback-функции на функцию WinInet...


1-1110522425
Homa_Programer
2005-03-11 09:27
2005.03.27
MDI vs ShowModal


3-1109500901
xman
2005-02-27 13:41
2005.03.27
Создание схемы в базе ORACLE