[Lisdrummer]

Здравствуйте! Как мне сделать так, что бы при нажатии на кнопку запускался определенный exe файл, то есть запускалась определенная программа?
Заранее спасибо!

[ApxaHGe1]

ShellExecute(0,'open','notepad.exe',nil,nil,SW_SHO WNORMAL)

[uberchel]

Запуск EXE:

Код:

WinExec('имя программы', SW_NORMAL);

Запуск любых файлов:
uses ShellApi; - незабуте поставить!

Код:

ShellExecute(0,'open',pchar('имя программы'),nil,nil,SW_NORMAL);

[Михалыч]

У меня так:

ShellExecute(Application.Handle,'open',pchar('calc .exe'),pchar(''), pchar(''), SW_SHOWNORMAL);

[Lisdrummer]

А что значит SW_NORMAL и какие еще бывают значения у этого атрибута?

[Lisdrummer]

У меня не работает! Я так понял, нужно чтобы исполняемый файл находился в одном каталоге с программой или есть еще какой-нибудь выход из этой ситуации?

[ApxaHGe1]

Сообщение от Lisdrummer

У меня не работает! Я так понял, нужно чтобы исполняемый файл находился в одном каталоге с программой или есть еще какой-нибудь выход из этой ситуации?

Код:

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls,ShellAPi;

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(0,'open','notepad.exe',nil,nil,SW_NORMAL)
end;

и не лежит notepad.exe рядом с ЕХЕ программы.... и все работает... читай внимательнее что тебе пишут

[Lisdrummer]

Не работает! Написал точно так же как вы подсказали... Кнопка просто щелкается и все, даже ошибка не выскакивает...

[Drozh]

ShellExecute(
0, // окно из которого запускаем
'open', // что делаем
PAnsiChar('ПОЛНЫЙ путь к файлу'), // путь к файлу
nil, // параметры запуска
nil, // дирректория для запуска
SW_NORMAL); // состояние окна программы

Шестой параметр может быть:
SW_HIDE;
SW_SHOWNORMAL;
SW_NORMAL;
SW_SHOWMINIMIZED;
SW_SHOWMAXIMIZED;
SW_MAXIMIZE;
SW_SHOWNOACTIVATE;
SW_SHOW;
SW_MINIMIZE;
SW_SHOWMINNOACTIVE;
SW_SHOWNA;
SW_RESTORE;
SW_SHOWDEFAULT;
SW_MAX;

Подробнее почитай в гугле

[ApxaHGe1]

Сообщение от Lisdrummer

Не работает! Написал точно так же как вы подсказали... Кнопка просто щелкается и все, даже ошибка не выскакивает...

Я бы не писал, если бы не работало, делфи 7 все нормально работает удачно ............

[Lisdrummer]

Спасибо, все нормально, просто я не писал ПОЛНЫЙ путь к файлу...)))