1. Наш канал codeby в telegram. Пишем об информационной безопасности, методах защиты информации, о программировании. Не пропускай новости с кодебай, будь в тренде ! Подробнее ...

    Скрыть объявление

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

Тема в разделе "Вопросы новичков и не только", создана пользователем anerita, 6 дек 2014.

  1. anerita

    anerita New Member

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

Поделиться этой страницей