| Mewex |
Дата: Четверг, 13.04.2017, 22:49 | Сообщение # 1
|
STEAM SELLER
Сообщений: 475
Статус: Offline
|
Многие начинающие кодеры на Delphi не знают, что есть ShellApi, который очень упростить жизнь.
Примеры того что можно делать:
Код Открывать сторонние программы, или же копии своей программы
Отправлять мэилы
Открывать сайты через браузер по умолчанию
Открывать документы
Открывать папки
etc.
Как использовать?
В uses добавим shellapi
Дальше оформляем нужную нам операцию через shellapi:
Код ShellExecute (hWnd: HWND; Operation: PChar; FileName: PChar; Parametrs: PChar; Directory: PChar; CmdShow: Integer): HINST;
где: hWnd – Handle родительского окна, в который будут передаваться сообщения запускаемого приложения. Можно указывать Handle-ссылку окна вашего приложения.
Operation – производимая операция. Open – открыть, print – напечатать, explore – открыть папку. По умолчанию open, если указать nil.
FileName – имя файла или документа, интернет ссылка, e-mail адрес.
Parametrs – параметры, передаваемые приложению в командной строке.
Directory – каталог по умолчанию.
CmdShow – стиль окна. Показывает, в каком состоянии будет отображаться окно при запуске. Подробно рассказано выше.
Примеры использования:
Код ShellExecute (Form1.Handle, nil, 'cheat-master.ru', nil, nil, SW_RESTORE); // запуск cheat-master.ru
ShellExecute (Form1.Handle, nil, PChar (Application.ExeName), nil, nil, SW_RESTORE); // запуск второй копии запущенной программы
ShellExecute (Form1.Handle, nil, 'iexplore', 'cheat-master.ru', nil, SW_RESTORE); // запуск в отдельном окне cheat-master.ru
ShellExecute (Form1.Handle, nil, 'example@mail.ru?subject= delphi', nil, nil, SW_RESTORE); // написать письмо
ShellExecute (Form1.Handle, nil, 'D:\Junger\1488.txt', nil, nil, SW_RESTORE); //открыть документ
|
|
|
|
|
