Заходит старушка в трамвай, предупреждая всех что у нее в сумке яйца. Проходя мимо молодого человека, задевает его маленький мешочек. ОН:
- Ах..., острожнее, тв@ю мать.
ОНА, слегка ударяя по мешку ножкой:
- А что у тебя там?
ОН, ударяя ногой по ее сумке со всей дури и разбивая к чертям собачьим все яйца.
- ДУРА! Там же ВИНЧЕСТЕР!
Программа на Delphi, которая запускает файл-ссылку (.lnk) с помощью функции ShellExecute из единицы ShellApi.
В этом конкретном случае, запускаемый файл-ссылка находится по адресу C:\WINDOWS\START MENU\DELPHI\Delphi3.lnk, что, вероятно, открывает IDE Delphi 3 или другое связанное приложение.
Чтобы запустить это программирование:
Откройте проект на Delphi и создайте новый форм.
Добавьте кнопку к форме и установите ее обработчик события OnClick в Button1Click.
Вставьте код в процедуру Button1Click.
Запустите программирование, нажав на кнопку или нажав F9.
Когда вы нажмете на кнопку, программа запустит файл-ссылку, что должно открыть Delphi 3 или другое связанное приложение.
Примечание: вам может потребоваться изменить путь к файлу-ссылке, если он находится в другом месте на вашем компьютере.
Статья описывает способ запуска файла lnk в Delphi с помощью процедуры ShellExecute и ее реализации на примере кнопки формы TForm1.
Комментарии и вопросы
Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS