![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Помоги спецы!!! [D6, D7, WinXP]
Лариса © (2004-12-04 09:54:00)Здравствуйте, спецы. Я навичок в Дельфи, поэтому обращаюсь к вам за помощью. В моей проге можно программно в PopupMenu добавляются пункты в SubMenu, (с этим все нормально) а вот как мне удалить какой то пункт после создания, и как назначить на созданый пункт procedure
Буду очень благодарна за помощь
Лариса (2004-12-04 10:27:00) [1]Sun bittern
Спасибо, все работает. :)
Sun bittern (2004-12-04 10:14:00) [2]Назначить событие:
В Public формы например написать
public
procedure MyClick(Sender: TObject);
Далее
procedure TForm1.MyClick(Sender: TObject);
begin
... Мой код ...
end;
ПунктМеню.OnClick := MyClick;
Удалить пункт по клику мышки
if Sender is TMenuItem then
TMenuItem(Sender).Free;