SASGIS

Веб-картография и навигация

View Issue Details [ Jump to Notes ] [ Issue History ] [ Print ]

ID Project Category View Status Date Submitted Last Update

0003350 SAS.Планета [All Projects] Баг public 08-07-2018 10:56 13-07-2018 14:33

Reporter zed

Assigned To zed

Priority normal Severity minor Reproducibility have not tried

Status resolved Resolution fixed

Platform OS OS Version

Product Version 160707

Target Version 181221 Fixed in Version 181221

Summary 0003350: Не работает масштабирование панелей вкладки Загрузить операций с выделенной областью при 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}

Если нет других предложений, то предлагаю добавить этот фикс.

Tags No tags attached.

Attached Files before.png [^] (26,363 bytes) 08-07-2018 10:56

after.png [^] (26,406 bytes) 08-07-2018 10:56

Relationships

related to

resolved

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

Notes
(0018358) vdemidov (manager) 09-07-2018 12:26	Ну, не знаю, это уж как-то совсем костыльно выглядит. Нужно как-то в общем виде это решать. В других же фреймах почти такие же должны быть проблемы. А если там проблем нет - нужно смотреть в чем отличие.

(0018359) zed (manager) 09-07-2018 13:08	Больше нигде проблем нету.

(0018360) vdemidov (manager) 09-07-2018 15:35	Значит нужно искать в чем отличие. Там или какая-то пропертя явно установлена, котрая в других фреймах стоит в состоянии по-умолчанию и отличается в разных версиях, или наоброт не выставленна, а в остальных установлена. Или может чего-то забыли при инициализации в конструкторе или в создающем коде. Ну не бывает же чудес. Там плюс-минус одинаковые фреймы на всех вкладках используются.

(0018365) zed (manager) 13-07-2018 14:05	Дело было (и есть) в свойстве Align. У указанных панелей оно было установлено в alCustom и новая Delphi из-за этого почему-то не смогла отмасштабировать размеры этих панелей. На остальных вкладках ни одна панель не выравнивается как alCustom, поэтому там и проблем нету. Добавил панель-контейнер pnlCenter (с alClient) и положил в неё pnlMapSelect (с alTop) и (pnlMain из pnlBottom с alClient). В pnlBottom не было ничего кроме pnlMain, поэтому её удалил, так что в итоге число панелей и не увеличилось даже, но по сути, pnlCenter нужна только для фикса бага.

(0018366) vdemidov (manager) 13-07-2018 14:20	> по сути, pnlCenter нужна только для фикса бага. В любом случае, это гораздо менее костыльный вариант, чем условная компиляция.

Users who viewed this issue
User List	Anonymous (1973x), gma (1x), vdemidov (14x), zed (8x)
Total Views	1996
Last View	21-11-2024 12:32

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

Copyright © 2007 - 2024 SAS.Planet Team