Открытие программ

  • Автор темы silverion
  • Дата начала
Статус
Закрыто для дальнейших ответов.
S

silverion

Гость
#1
Помогите пожалуйста! Мне нужно сделать программу где будет меню, и при нажатии меню должны открываться другие, ранее созданные мной программы, как это сделать? очень надо
 

Гость
#2
Если "ранее созданные мной программы" это exe файлы, то можно так:

procedure TfrmMain.mnuDivSpsClick(Sender: TObject);
var
SI:TStartupInfo;
PI:TProcessInformation;
begin
FillChar(SI,SizeOf(SI),0);
SI.cb:=SizeOf(SI);
CreateProcess(PAnsiChar(PatchToProgramm+'Divsps.exe'),nil,nil,nil,False,0,nil,nil,SI,PI);
end;
 
P

Poseidon

Гость
#3
Правильнее запускать функцией ShellExecute
 
Статус
Закрыто для дальнейших ответов.