Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Запуск 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);


Наверх

Титульная страница Поиск, карта сайта Написать письмо