procedure TForm1.Button4Click(Sender: TObject);begin WinExec('calc.exe',SW_SHOW );end;
E-mail: info@telesys.ru