присвоение функции по OnClick в реальном времени.

← →
Yozch1 (2003-09-19 18:33) [0]

Создаю пункт меню. Есть готовая функция для реакции при выборе этого пункта. Как присвоить ей функцию при создании?

MyNewItem:=TMenuItem.Create(Self);

//как это написать правильно?
//присвоить функцию созданному пункту меню?
MyNewItem.onClick:=GetDefault;//????

MyNewItem.Caption:="бла-бла-бла;
N29.add(MyNewItem);

← →
BOA_KAA © (2003-09-19 18:40) [1]

Я знаю, я знаю!!!

MyNewItem.onClick:=MyClick;

...

procedure TForm1.MyClick(Sender: TObject);
begin
//TO DO
end;

← →
Думкин © (2003-09-19 18:45) [2]

TAction не пробовал? Красиво сие.

← →
BOA_KAA © (2003-09-19 18:49) [3]

Не, ну это уже для асов :)

← →
Yozch1 (2003-09-19 21:08) [4]

Юмористы, блин. Или я тупой.

MyNewItem.onClick:=MyClick;

не катит эта хрень.

Коллеги, где решение :-) ?

← →
Yozch1 (2003-09-19 21:40) [5]

Блин.
Я процедуру объявлял без параметров. сделал-таки как предложил BOA_KAA - дело пошло. Спасибо тебе BOA_KAA!
Видимо приколы дельфей.

> Видимо приколы дельфей.

? чего?
Скорее приколы твоего сознания

Чтобы у дельфей было поменьше "приколов" настойчиво советую

http://www.delphikingdom.com/helloworld/runtime_comp.htm

И все статьи из

http://www.delphikingdom.com/asp/section.asp?ID=16

к обязательному прочтению!!!!

присвоение функции по OnClick в реальном времени. Найти похожие ветки