Home

Page 127
Page 127
background image

120 Глава 3

 Запуск файла на

function

 DefaultDir: string;

 Integer): THandle;

var

 zDir: array[0..79] of Char;

begin

Result :=

 nil,

 FileName),

 Params),

 DefaultDir}, ShowCmd);

end;

Чтобы ее использовать, нужно добавить это описание в свой модуль. Только

не забудьте добавить еще в раздел uses модуль

 иначе проект нель-

зя будет скомпилировать.

У функции четыре параметра.

 Имя файла, или полный путь к файлу, который надо запустить.

 Параметры, которые надо передать запускаемой программе (то, что нуж-

но написать в командной строке).

 Директория по умолчанию, с которой должна работать программа. Если

директория не указана, то будет использоваться та, в которой находится
запускаемый файл.

 Способ отображения запущенного файла. Набор способов идентичен то-

му, ЧТО МЫ ИСПОЛЬЗОВалИ В

Вот простой пример использования данной функции:

С помощью этой же функции можно запускать Internet Explorer (или другой
браузер, который установлен по умолчанию) и загрузить

страничку:

E x e c u t e F i l e

 //www.

 ;

Если нужно создать электронное письмо, то это можно сделать следующим

способом:

Функцию ShellExecute мы уже рассматривали в разд. 2.5, и все же я решил

описать ее еще раз, чтобы выделить в отдельную процедуру. Применяя ее,

вам не надо следить за типом pchar, который

 передачи

строк, потому что наша функция ExecuteFile сама сделает необходимые
преобразования.


Copyright © 2020 Файлообменник files.d-lan.dp.ua

Использование любых материалов сайта возможно только с разрешения автора.