Открыть ЕХЕ файл

← →
Rozumovsky (2002-06-13 17:31) [0]

Пожалуйста помогите чайнику, как с помощью кнопки открыть (выполнить) другой исполняемый ехе файл с такой-то директории.
Буду очень признателен.

← →
Игорь Шевченко © (2002-06-13 17:44) [1]

procedure TForm1.Button1Click (Sender : TObject);
begin
WinExec("c:\windows\notepad.exe");
end;

← →
BJValentine © (2002-06-13 19:42) [2]

Ага, а ещё точнее, для правильности

WinExec(pchar("c:\windows\notepad.exe"),SW_SHOW);

← →
Song © (2002-06-13 19:45) [3]

2BJValentine © (13.06.02 19:42)
PChar нужен для переменной. Если стока указана в явном виде дополнительной конвертации не требуется, компилятор всё сделает сам.

← →
Alessio © (2002-06-13 23:21) [4]

Ещё можно использовать функцию
ShellExecute(Application.MainForm.Handle,open, PChar("notepad.exe"), nil, nil, SW_ShowNormal);

Application.MainForm.Handle - запуск идёт с главной формы.
open - открытие exe"шника или если, к примеру, это файл с расширением doc, то откроется Word.

Для использование этой функции нужно в разделе USES написать библиотеку ShellApi.

TO Rozumovsky:
1. Двожды щёлкнуть на значок EXE - Файла, предварительно открыв папку, его содержащую
2. Вызвать окно RUN (Start+R) и указав имя исполняемого файла, нажать Ok(ENTER)
3. вызвав Command Prompt, указать имя Exe-файла, и нажать ENTER
4. на рабочем столе, создать ярлык для EXE-файла, а в свойствах ярлыка, в свойстве ShortCut key, выбрать комбинацию клавиш, нажать Ок, и вызывать EXE-Файл, нажатием на эту комбинацию.

И НИ В КОЕМ СЛУЧАЕ НЕ ИСПОЛЬЗУЙ ФУНКЦИИ WINEXEC И SHELLEXECUTE !!!! :))) Не зря же MICRO$OFT так трудился ! :)))

PS: кстати, MICRO$OSF - трудился, или трудилась ?

2 VID © (14.06.02 00:11)
> кстати, MICRO$OSF - трудился, или трудилась ?
Это компания- женский род, значит "трудилась" :)
Хотя иногда неверится :)))

Открыть ЕХЕ файл Найти похожие ветки