[Daniil]

Добрый день!
Народ подскажите уже всю голову сломал, ситуация следующая:
Есть мной написанное приложение на Delphi 10.1 Berlin, простенькое, при применении стиля для приложения через Options-Shift+Ctrl+F11/ Appearance
выбираю стиль приложения Windows10 Dark, мое приложение перестает открывать исполняемый файл по сети (*.exe), восстанавливаю стиль обычный все работает!!! Что может быть? Ясно дело проблема наверное в стиле, но без стиля нельзя оставлять т.к процесс визуализации на стадии завершения и перерабатывать его не хочется.

if CheckBox7.checked then begin
ShellExecute(Handle, 'open', '\\192.168.0.2\setup.exe', nil, nil, SW_RESTORE);
end else
ShellExecute(Handle, 'open', '\\192.168.0.2\setup1.exe', nil, nil, SW_RESTORE);

end;

[Daniil]

Сообщение от Daniil

Добрый день!
Народ подскажите уже всю голову сломал, ситуация следующая:
Есть мной написанное приложение на Delphi 10.1 Berlin, простенькое, при применении стиля для приложения через Options-Shift+Ctrl+F11/ Appearance
выбираю стиль приложения Windows10 Dark, мое приложение перестает открывать исполняемый файл по сети (*.exe), восстанавливаю стиль обычный все работает!!! Что может быть? Ясно дело проблема наверное в стиле, но без стиля нельзя оставлять т.к процесс визуализации на стадии завершения и перерабатывать его не хочется.

Перестает работать кнопка "Запустить"!!!

[@Rafa3L]

setup.exe - зарезервированное имя в системе Windows

[Daniil]

Сообщение от @Rafa3L

setup.exe - зарезервированное имя в системе Windows

Не в этом дело.

[Alegun]

Может слетает обработчик у кнопки - для проверки хорошо бы добавить в его тело строчку в конце - ShowMessage('Button pressed!'); ,сообщение при смене стиля будет вылазить?

[Daniil]

сейчас попробую...

[Daniil]

Сообщение от Alegun

Может слетает обработчик у кнопки - для проверки хорошо бы добавить в его тело строчку в конце - ShowMessage('Button pressed!'); ,сообщение при смене стиля будет вылазить?

Код:

if CheckBox3.checked then  begin
       ShellExecute(Handle, 'open', '\\192.168.0.2\Avast\avast_free_antivirus_setup_online.exe', nil, nil, SW_RESTORE);
        вставил тут!! ShowMessage('Button pressed!');
         end else

         if MessageDlg( и тд...

Вставил код сообщение появилось только после нажатия кнопки отмена (Окно виндовое не отрабатывает!! см.вложение.), вставлял код выше после then begin, сообщение появилось... тут с кодом все наверное хорошо, проблема с самой платформе наверное...... может есть ище идеи? Ведь при смене стиля все работает!