Масштаб экрана
От: darkn  
Дата: 10.08.04 07:29
Оценка:
Господа!

Не могли бы помочь с вопросом...
Помещая на форму любой визуальный объект( кнопка, эдитбокс и т.п.), помещая его поближе к правой стороне формы, я устанавливаю для них такие свойства Anchors[akLeft=False,akTop=True,akRight=True,akBottom=False]...Делаю это я для того, чтобы при изменении по горизонтали размера окна, эти визальные объекты тоже перемещались...
Все это прекрассно работает, но при изменении масштаба шрифтов экрана, получается так, что изменяются место расположение этих визуальных объектов, причем, если делается это все на обычном масштабе (96 точек/дюйм), то при переходе на крупный размер 120 точек/дюйм, теже кнопки и т.п. оказываются где-то далеко справа и их не видно, ну и естественно их никак не вытащить...
Подскажите в чем проблема, я использую Delphi7

Спасибо.
Re: Масштаб экрана
От: garant  
Дата: 10.08.04 08:07
Оценка:
Здравствуй, darkn.

d> Не могли бы помочь с вопросом...


О как! А я думал, надо помочь с ответом...

d> точек/дюйм, теже кнопки и т.п. оказываются где-то далеко справа и

d> их не видно, ну и естественно их никак не вытащить...
d> Подскажите в чем проблема, я использую Delphi7

Это из-за корявости VCL. Нужно исправить TCustomForm.ReadState с тем,
чтобы ClientWidth и ClientHeight устанавливались до того, как форма
будет scaled в соответствии с текущим маштабом.


--
Тон
Posted via RSDN NNTP Server 1.9 beta
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.