View Issue Details

IDProjectCategoryView StatusLast Update
0003350SAS.ПланетаБаг / Bugpublic13-07-2018 14:33
Reporterzed Assigned Tozed  
PrioritynormalSeverityminorReproducibilityhave not tried
Status resolvedResolutionfixed 
Product Version160707 
Target Version181221Fixed in Version181221 
Summary0003350: Не работает масштабирование панелей вкладки Загрузить операций с выделенной областью при dpi <> 96
DescriptionВ Delphi Tokyo (и по-моему, в XE2 было так же) на фрейме TfrTilesDownload не масштабируется ширина панелей выбора карты (pnlMapSelect) и настроек (pnlBottom) при dpi большем, чем 96 (см. скриншот before - в системе с установленным dpi = 106). Delphi 2007 этот фрейм масштабирует нормально и растягивает указанные панели как надо.

Не знаю, как это можно исправить по-человечески, но работает вот такой фикс в TfrTilesDownload.Init:

  {$IF CompilerVersion > 19}
  if Screen.PixelsPerInch <> 96 then begin
    pnlMapSelect.Width := Self.Width - pnlZoom.Width;
    pnlBottom.Width := Self.Width - pnlZoom.Width;
  end;
  {$IFEND}

Если нет других предложений, то предлагаю добавить этот фикс.
TagsNo tags attached.
Attached Files
before.png (26,363 bytes)   
before.png (26,363 bytes)   
after.png (26,406 bytes)   
after.png (26,406 bytes)   

Relationships

related to 0003317 resolvedzed Пропадают настройки вкладки "Загрузки" при масштабе Windows 200%  

Activities

vdemidov

09-07-2018 12:26

manager   ~0018358

Ну, не знаю, это уж как-то совсем костыльно выглядит. Нужно как-то в общем виде это решать. В других же фреймах почти такие же должны быть проблемы. А если там проблем нет - нужно смотреть в чем отличие.

zed

09-07-2018 13:08

manager   ~0018359

Больше нигде проблем нету.

vdemidov

09-07-2018 15:35

manager   ~0018360

Значит нужно искать в чем отличие. Там или какая-то пропертя явно установлена, котрая в других фреймах стоит в состоянии по-умолчанию и отличается в разных версиях, или наоброт не выставленна, а в остальных установлена. Или может чего-то забыли при инициализации в конструкторе или в создающем коде. Ну не бывает же чудес. Там плюс-минус одинаковые фреймы на всех вкладках используются.

zed

13-07-2018 14:05

manager   ~0018365

Дело было (и есть) в свойстве Align. У указанных панелей оно было установлено в alCustom и новая Delphi из-за этого почему-то не смогла отмасштабировать размеры этих панелей. На остальных вкладках ни одна панель не выравнивается как alCustom, поэтому там и проблем нету.

Добавил панель-контейнер pnlCenter (с alClient) и положил в неё pnlMapSelect (с alTop) и (pnlMain из pnlBottom с alClient). В pnlBottom не было ничего кроме pnlMain, поэтому её удалил, так что в итоге число панелей и не увеличилось даже, но по сути, pnlCenter нужна только для фикса бага.

vdemidov

13-07-2018 14:20

manager   ~0018366

> по сути, pnlCenter нужна только для фикса бага.
В любом случае, это гораздо менее костыльный вариант, чем условная компиляция.

Issue History

Date Modified Username Field Change
08-07-2018 10:56 zed New Issue
08-07-2018 10:56 zed Status new => assigned
08-07-2018 10:56 zed Assigned To => zed
08-07-2018 10:56 zed File Added: before.png
08-07-2018 10:56 zed File Added: after.png
09-07-2018 12:26 vdemidov Note Added: 0018358
09-07-2018 13:08 zed Note Added: 0018359
09-07-2018 15:35 vdemidov Note Added: 0018360
13-07-2018 14:05 zed Note Added: 0018365
13-07-2018 14:06 zed Status assigned => resolved
13-07-2018 14:06 zed Fixed in Version => 181221
13-07-2018 14:06 zed Resolution open => fixed
13-07-2018 14:20 vdemidov Note Added: 0018366
13-07-2018 14:33 zed Relationship added related to 0003317
08-08-2025 13:22 zed Category Баг => Баг / Bug