• Paranoid - курс по анонимности и безопасности в сети от команды codeby. Защита персональных данных, анонимность в сети интернет, настройка виртуальных машин, безопасная передача данных, анти форензика и еще много всего полезного. Подробнее ...

  • Мобильный клиент нашего форума для Android гаджетов доступен в Google Play Market по этой ссылке. Клиент можно скачать с нашего форума по этой ссылке. Последняя версия МК в нашем телеграм канале вот здесь

Запуск Внешней Программы (delphi)

anerita

New member
08.11.2012
0
0
#1
Здравствуйте.Необходимо создать приложение, выполняющие следующие действия:
– предложить пользователю с помощью стандартного блока диалога выбрать документ, который необходимо открыть;
– определить, какое приложение просматривает этот документ по умолчанию;
– если пользователь не согласен использовать приложение по умолчанию, то предложить ему выбрать приложение для открытия документа самостоятельно;
– открыть документ в приложении, выбранном пользователем, с помощью функции ShellExecute;
– режим показа главного окна приложения должен выбрать пользователь с помощью группы радиокнопок.
Со стандартным открытием нужного документа,я разобралась. Помоги ,пожалуйста,с остальным разобраться. Может у кого то есть похожая программа.
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenDialog1.Execute  then
ShellExecute(Handle,'open',PChar(OpenDialog1.FileName), nil,nil,SW_Restore);

end;

end.
Извините,тема добавилась несколько раз!при добавлении темы возникает ошибка.
 

Вложения