[DOR]

Добрый день.
При проектировании компоненту GroupBox указываю width = 200.
Запускаю проект и все хорошо. Визуализация как и была задумана.
Если компоненту GroupBox задать width = 200 через кнопку на форме, то в итоге ширина получается меньше "решет" все что есть в GroupBox.
Это происходит при запуске на ноуте с не большим экраном.
Если запустить на ПК и большим монитором, то все ок, работает как и задумывалось.
Как сделать чтобы width = 200 была одинаковая и с большим и маленьким экраном?

[lmikle]

Никак.
На самом деле ширина во всех случаях будет 200. Просто, в силу масштабирования текста на "маленьком" экране, размер текста и, сообтветственно, всех компонентов становится больше. Т.е. это не GroupBox становится меньше, а все компоненты становятся больше.


Как я понял, то если размер не устанавливать по кнопке, то все отображается нормально. Тогда либо не трогай размеры, пусть винда сама переразмеривает в зависимости от коэф. масштабирования, либо надо учитывать этот момент при установке размеров.

Вот что Co-Pilot советует (не проверял):

Код:

function GetScreenScaleFactor: Single;
begin
  Result := Screen.PixelsPerInch / 96; // 96 DPI is the default scale (100%)
end;

Если у тебя мультимониторная конфигурация, то там сложнее будет, надо получать этот коэф. для конкретного монитора.