open '.exe' file in Delphi pascal

[11111977]

I'd like to open an '.exe' file in Delphi Pascal on a buttonclick. do anybody have a code example?
thank you

 

[VintageWine]

Windows API CreateProcess does the trick.

Here is a simple wrapper for it

procedure SHCreateProcess(const ACommandLine:string);
var
StartupInfo:TStartupInfo;
ProcessInformation:TProcessInformation;
begin
FillChar(StartupInfo,Sizeof(StartupInfo),0);
FillChar(ProcessInformation,Sizeof(ProcessInformation),0);

if CreateProcess(nil,pchar(ACommandLine),
nil,nil,false,0,nil,nil,StartupInfo,ProcessInformation)then begin
CloseHandle(ProcessInformation.hProcess);
CloseHandle(ProcessInformation.hThread);
end;
end;

 

[KempCGDR]

or a simple

ShellExecute(Handle, 'open', PChar([Filename here]), nil, nil, SW_SHOWNORMAL);