Форум: "Основная";
Текущий архив: 2004.07.11;
Скачать: [xml.tar.bz2];
ВнизКак программно назначить событию OnClik для меню свою процедуру? Найти похожие ветки
← →
Lexa (2004-06-24 12:53) [0]Мастеры помогите плиз!
Как программно назначить событию OnClik для меню свою процедуру?
procedure TForm1.Button1Click(Sender: TObject);
var Item1 : TMenuItem;
begin
Item1:=TMenuItem.Create(self);
Item1.Caption:="!!!";
PopupMenu.Items[0].Add(Item1);
PopupMenu.Items[0].Items[0].OnClick:=p; //?????
end;
procedure p(Sender : TObject);
begin
Form1.Caption:="!!!!!!!!!!!!!!!!!!!!";
end;
← →
Lexa (2004-06-24 12:58) [1]и подскажите плиз, как в эту процедуру p передать параметр, н-р номер Item"а на кторый щёлкнули.
Спасибо.
← →
имя (2004-06-24 13:02) [2]Удалено модератором
← →
KSergey © (2004-06-24 13:09) [3]http://www.delphikingdom.ru/asp/viewitem.asp?catalogid=342
← →
evvcom © (2004-06-24 13:10) [4]Причем употребление Form1 не нужно. Т.е.
procedure TForm1.p(Sender : TObject);
begin
Caption:="!!!!!!!!!!!!!!!!!!!!";
end;
← →
Lexa (2004-06-24 13:24) [5]Спасибо
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.07.11;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.038 c