Последние записи

made in programmersforum 4

Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки?
Slurm подготовили для вас особенный продукт! Оставить заявку по ссылке - https://slurm.club/3MeqNEk

Online-курс Java с оплатой после трудоустройства. Каждый выпускник получает предложение о работе
И зарплату на 30% выше ожидаемой, подробнее на сайте академии, ссылка - ttps://clck.ru/fCrQw

11th
Окт

При клике на элемент TPopupMenu выполнять функцию ShellExecute

Posted by Chas under Delphi, Пост-обзор

Задача такова: есть TPopupMenu. В него динамически добавляются элементы, которые в качестве Caption содержат директории (C:\,F:\ и тд). Нужно динамически прописать, чтобы при клике на элемент его Caption исполнялся в ShellExecute. Возможно такое сделать?

Аватар

  menuItem.OnClick:=PopupClick; // Здесь присвоить TNotifyEvent;

...
procedure TForm1.PopupClick(Sender: TObject);

begin

//TMenuItem(Sender).Caption и будет ваша дирректория

end;

тема на форуме