Delphi - база знаний


Как запустить другое приложение?


Как запустить другое приложение?





uses 
  libc; 

procedure TForm1.Button1Click(Sender: TObject); 
var 
  iPrg: Integer; 
begin 
  //Execute kcalc - A calculator for KDE 
  iPrg := libc.system('kcalc'); 
  if iPrg = -1 then 
    ShowMessage('Error executing your program'); 
end

Взято с сайта



Содержание раздела