Вниз
Скачать: CL | DM;

Изменение размеров шрифта   Найти похожие ветки 

 
Bosso   (2003-07-24 10:48) [0]

Злые юзеры хотят, чтобы в проге был переключатель на большой и жирный шрифт (видимо, для умственно слепых).
Может быть, кто-то подскажет легкий способ изменения всех шрифтов в программе на другие так, чтобы не перекашивались элементы управления?
Я сделал перебором всех компонент, имеющих свойство Font, в цикле, и изменение размера фонта, а также увеличение размеров самих контолов на определенный процент. Но, конечно, все равно все наехало друг на друга. Помогите, а?


 
Skier ©   (2003-07-24 10:49) [1]

>Bosso (24.07.03 10:48)
TYourControl.ParentFont ?


 
Bosso   (2003-07-24 10:52) [2]

> Skier © (24.07.03 10:49)
Да нет, думаю, не получится. Вопрос-то не в том, как увеличить фонт, а как сделать так, чтобы пропорционально увеличить все контролы, чтобы не ломался интерфейс.


 
Skier ©   (2003-07-24 10:54) [3]

TWinControl.ScaleBy(...) ?


 
Andrey007   (2003-07-24 10:58) [4]

Можно раздвигать форму пропорционально изменению размера шрифта.
В ТЗ на программу должны быть определены диапазон изменения размера шрифта, иначе Вы можете кучу времени потратить впустую.


 
Bosso   (2003-07-24 10:59) [5]

> Skier © (24.07.03 10:54)

А вот про такую штуку почему-то вообще не слышал. Сейчас попробовал - похоже! Спасибо!


 
Andrey007   (2003-07-24 11:02) [6]

Bosso, на форме есть свойство Scaled, которое разрешает или запрещает изменение размеров элементов под размер шрифта


 
Bosso   (2003-07-24 11:08) [7]

> Andrey007 (24.07.03 11:02)
Спасибо, уже нашел

Короче, я понял так, что надо:
1. Установить scaled в true
2. Вызвать процедуру ScaleBy
3. Изменить размер формы.

Все?



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.012 c
3-20445
Viktor
2003-07-16 10:21
2003.08.07
Печать Sql


1-20605
Dead Stark
2003-07-24 10:33
2003.08.07
GB-2312 -> HZ-GB-2312.... Как?


4-20864
killer
2003-06-03 18:36
2003.08.07
Еще вопросик про кнопочки... :)))


3-20432
62mkv
2003-07-15 07:43
2003.08.07
SQL monitor + InterBase = ?


1-20524
tytus
2003-07-26 10:00
2003.08.07
Как в StatusBar-е писать по-русски?




   Наверх