[Bloo]

Как в Delphi при нажатии кнопки Button запустить программу Turbo Pascal?

[ЖабаДушитКота]

WinExec('Путь к папке с турбо паскаль\Турбо Паскаль.exe',1);

[Bloo]

Спасибо ))

[Paskal]

Код:

Uses
ShellAPI;
//-----------------------------------
TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(Handle,nil,'toorbo paskal.exe',nil,nil,SW_SHOWNORMAL);
end;

Не забудь в раздел модулей подключить ShellAPI
Думаю дальше сами все поймете.

[Bloo]

Paskal, спасибо