Показать сообщение отдельно
  #4  
Старый 21.06.2017, 12:35
Daniil Daniil вне форума
Прохожий
 
Регистрация: 02.04.2014
Сообщения: 22
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию Дополнение:

При этом действии выводит ShowMessage('File not found,'); Путь до файла правильный , сам файл существует, выполняю это все на win 10! возможно это и есть причина?
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,');
Проверил на xp, работает.В режиме совместимости windows 7 на 10-ке, не работает.
Ответить с цитированием