ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Для приложения плохо работает Snap Assist в Windows 10
10 сообщений из 10, страница 1 из 1
Для приложения плохо работает Snap Assist в Windows 10
    #39522137
crossa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
crossa
Гость
В Windows 10 есть удобная функция Snap Assist :
https://www.digitaltrends.com/computing/how-to-split-your-screen-in-windows-10/
Ее настройки находятся в панели управления операционной системы, раздел "Система", подраздел "Многозадачность".

К сожалению, в моих программах эта функция работает не полностью. Не срабатывает опция "При изменении размера прикрепленного окна одновременно изменять размер смежного прикрепленного окна". Вот пример этой же проблемы в другой программе:
https://github.com/RolandPheasant/TailBlazer/issues/168

Проблема еще в том, что программы создавались несколько лет: в их окнах много элементов, написано много кода. Программы скомпилированы в Delphi 2007 и 2009.

Создал в Delphi 2009 программу с пустой формой, откомпилировал - для нее функция Snap Assist работает нормально. То есть, можно утверждать, что проблема не в версии Delphi.

Бьюсь над разгадкой несколько дней; не знаю, где еще копать. Если кто-то уже сталкивался с такой проблемой, подскажите, буду очень признателен.
...
Рейтинг: 0 / 0
16.09.2017, 02:46
| Ответить | Цитировать | Написать  
Для приложения плохо работает Snap Assist в Windows 10
    #39522194
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_Vasilisk_
Участник
crossaв их окнах много элементов, написано много кода.Удаляйте код, пока не найдете проблемное место. Дальше думайте
...
Рейтинг: 0 / 0
16.09.2017, 13:41
| Ответить | Цитировать | Написать  
Для приложения плохо работает Snap Assist в Windows 10
    #39522211
crossa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
crossa
Гость
Решением проблемы стало добавление строки в файлы *.dpr:
Код: pascal
1.
Application.MainFormOnTaskbar := True;


Только после этого приложения работают нормально с функцией Snap Assist в Windows 10.
...
Рейтинг: 0 / 0
16.09.2017, 16:14
| Ответить | Цитировать | Написать  
Для приложения плохо работает Snap Assist в Windows 10
    #39522274
crossa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
crossa
Гость
После того, как стал присваивать Application.MainFormOnTaskbar значение True, возникла неприятная особенность: когда программа минимизирована, при ее восстановлении окно перерисовывается заметным образом, "моргает". При Application.MainFormOnTaskbar равным False такого нет. Операционная система Win7/10, версия Delphi 2007/2009.

Подскажите, как можно избавиться от лишних перерисовок главного окна при развертывании после минимизации. А то получается, что поменял шило на мыло: Snap Assist заработал, но с рисованием главного окна начались проблемы.
...
Рейтинг: 0 / 0
16.09.2017, 23:15
| Ответить | Цитировать | Написать  
Для приложения плохо работает Snap Assist в Windows 10
    #39522384
Фотография makhaon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
makhaon
Участник
crossa,

это обычное состояние, когда лечение болезни подменяется лечением симптомов.
...
Рейтинг: 0 / 0
17.09.2017, 16:16
| Ответить | Цитировать | Написать  
Для приложения плохо работает Snap Assist в Windows 10
    #39522510
crossa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
crossa
Гость
makhaon,

Простите, не понял смысл Вашего высказывания.

Главное окно моей программы содержит стандартные элементы. Если Application.MainFormOnTaskbar = True, то при развертывании окна из минимизированного состояния вместо TListbox и TButton сначала видны прямоугольники черного цвета, а сами эти компоненты отрисовываются спустя заметный глазу интервал времени. Это не кажется мне нормальным. Если Application.MainFormOnTaskbar = False, никаких проблем с восстановлением окна из минимизированного состояния нет.

Кто-нибудь еще сталкивался с такой проблемой?
...
Рейтинг: 0 / 0
17.09.2017, 21:42
| Ответить | Цитировать | Написать  
Для приложения плохо работает Snap Assist в Windows 10
    #39523219
Фотография makhaon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
makhaon
Участник
crossa,

надо искать конкретную причину неработоспособности Snap Assist. Вероятно - не до приложения не доходят какие-то события, которые доходят при включенном MainFormOnTaskbar. И искать варианты словить эти события с выключенным.
...
Рейтинг: 0 / 0
19.09.2017, 12:22
| Ответить | Цитировать | Написать  
Для приложения плохо работает Snap Assist в Windows 10
    #39523220
Фотография makhaon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
makhaon
Участник
Господа, сделайте функцию редактирования в форуме ) Ну крайне неудобно )
...
Рейтинг: 0 / 0
19.09.2017, 12:23
| Ответить | Цитировать | Написать  
Период между сообщениями больше года.
Для приложения плохо работает Snap Assist в Windows 10
    #40072311
crossa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
crossa
Гость
Снова стала актуальной эта проблема, спустя несколько лет; но вдруг кто-нибудь также столкнулся с этой проблемой и нашел решение.

Вопрос. Кому-нибудь удалось добиться от программы на Delphi полной поддержки функции Snap Assist в Windows 10 при таком значении Application.MainFormOnTaskbar?
Код: pascal
1.
Application.MainFormOnTaskbar := False;


В программе на Delphi перестает работать одна из функций Snap Assist: "Если два окна отображаются рядом друг с другом, вы можете изменить их размер одновременно, выбрав и перетащив разделительную линию." Функция будет работать только для тех программ, у которых Application.MainFormOnTaskbar равняется True.

Если кто-то знает решение, поделитесь, пожалуйста.
...
Рейтинг: 0 / 0
23.05.2021, 19:45
| Ответить | Цитировать | Написать  
Для приложения плохо работает Snap Assist в Windows 10
    #40072466
delphinotes
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
delphinotes
Гость
crossa,

Application.MainFormOnTaskbar влияет на много мелочей при взаимодействии с ОС, всё же лучше его устанавливать в True.

А проблему с лишним мерцанием при разворачивании удалось решить, путём задавливания сообщения WM_WINDOWPOSCHANGED при разворачивании:

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
procedure WMWindowPosChanged(var Msg: TWMWindowPosChanged); message WM_WINDOWPOSCHANGED;
..
procedure TBaseForm.WMWindowPosChanged(var Msg: TWMWindowPosChanged);
begin
  if IsIconic(Handle) then
    // VCL bug: calling UpdateBounds from the Restore event causes additional window flickering
    Exit;
  inherited;
end;



https://github.com/delphinotes/BaseForms
...
Рейтинг: 0 / 0
24.05.2021, 14:58
| Ответить | Цитировать | Написать  
10 сообщений из 10, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Для приложения плохо работает Snap Assist в Windows 10
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]