Запуск Внешней Программы (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.
Извините,тема добавилась несколько раз!при добавлении темы возникает ошибка.
 

Вложения