Всем доброго дня!
Имеется следующая проблема - приложение на Дельфи 7, съезжает форма имеющая свойство bsSizeToolWin на Windows 8. То есть половина компонентов справа и снизу ушли за пределы формы и не видны.
У пользователя стоит увеличенный DPI, а на FormShow такой код:
Height :=Ini.ReadInteger('ZakupkaTovara', 'Height', 516);
Width := Ini.ReadInteger('ZakupkaTovara', 'Width', 629);
Если пользователь переключит на DPI 96, то все нормально...
Переделал на код
Height := MulDiv(Ini.ReadInteger('ZakupkaTovara', 'Height', 516), Screen.PixelsPerInch, 96);
Width := MulDiv(Ini.ReadInteger('ZakupkaTovara', 'Width', 629), Screen.PixelsPerInch, 96);
Никакого результата, хотя в других формах не bsSizeToolWin этот код работает.
При всем этом, у меня на Windows 7 и 10 все корректно отражается