![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Запуск exe файла... [D7, Win95/98]
voe © (2003-11-22 03:10:00)
помагите
КАК запустить exe файл по нажатию книпки(Button)
Prov (2003-11-22 10:31:00) [1]
Насколько я знаю, функция WinExecустарела и оставлена для совместимости с 16-разрядными ОС... Но это на сколько я знаю и довольно не точно... Хотя и эту ф-цию используют довольно успешно.
Рекомендуется использовать ShellExecuteи CreateProcess. Насколько я понимаю, Вы ещё мало чего умеете и знаете, посему CreateProcess может Вам показаться довольно сложной, используйте ShellExecute, пример:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ShellApi, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(Form1.Handle, "open", "C:\Windows\Notepad.exe", nil, nil, SW_SHOWNORMAL);
end;
end.
данный код будет работать при условии, что у Вас на форме имеется кнопка Button1... Директорию поменяйте на "свою".
Maxud (2003-11-22 03:26:00) [2]
WinExec("test.exe", SW_SHOWNORMAL);