Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Large Fonts. Ползут контролы а формы-овнеры не ресайзятся [D6, Win2k]


Sparrow ©   (2005-06-15 11:56:00) 

Посмотрел тут на свои всплывающие диалоги в режиме Large Fonts и ужаснулся. Все контролы увеличились и некоторые формы также нормально увеличились, чтобы контролы влезали, а несколько форм осталось прежнего размера и некоторые контролы просто вылезли за пределы формы. А че делать не знаю. Help Plz!


Sparrow   (2005-06-15 14:08:00) [1]

Упс, лажанулся малесь... В общем дело в AutoScroll.
При AutoScroll := false все формы ресайзятся правильно


Sparrow   (2005-06-15 13:04:00) [2]

2Семен Сорокин
спасибо, это круто конечно, только вот все надписи теперь друг на друге. Все контролы влезают но вид то у форм не товарный совсем.
Все, кажется разобрался... Неадекватно ресайзятся только те формы, которые имеют контролы с растягивающими (т.е. одновремнно нижний и верхний или правый и левый) якорями (Anchors) (например TGroupBox, TlistView и т.д.)
А вот и решение, Scaled не трогаем, а якоря проставлять придется в OnCreate
Да, и особоняком держится TPageControl, ресайзится не понятно как. У меня где надо правильно отресайзился а в тестовых формах криво.

2Amoebaклассное решение. Только пользователь, если он действительно работает на Large Fonts скорее всего имеет проблемы со зрением, ведь он не зря их ставит. И если ему гнать диалоги на малых шрифтах, то он вполне может неприязненно относиться к проге, а в потере конечных пользователей я не заинтересован


Amoeba   (2005-06-15 12:31:00) [3]

http://cpr.biblio-globus.ru/GlobusLib.htm
http://cpr.biblio-globus.ru/small_font_defence.htm


Семен Сорокин   (2005-06-15 12:25:00) [4]

Form.Scaled = false


Наверх

Титульная страница Поиск, карта сайта Написать письмо