[Alegun]

Код:

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
 if CheckBox3.checked then
  begin
  //--------------------avast
 // CheckBox3.Enabled:= FileExists('\\PCServer\Distrib\Avast\avast.exe');
   if WinExec('\\PCServer\Distrib\Avast\.exe',1) < 32 then
    ShowMessage('File not found,');
  end else
   begin
   //------------------- NOD32-----------------------
    if MessageDlg('Скопируйте инсталяционный пакет согласно разрядности' +
     ' системы и запустите установку ( Только для сотрудников ).',
      mtConfirmation,[mbYes,mbNo],0)= mrYes then
       if WinExec('explorer \\PCServer\autoinstall\NOD42_2018\Eset_NOD42_2018',SW_SHOW) < 32 then
        ShowMessage('File not found,');
   end;
end;