Tips (1541)

Tip Rating (4):

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;