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

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

InputBox & шрифт [D5, XP]


Shurup ©   (2007-11-13 17:23:00) 

Здравствуйте.
Уж слишком мелкий шрифт у компонентов диалогового окна, вызываемого функцией InputBox. Как увеличить?


Shurup   (2007-11-13 18:44:00) [1]

Reindeer Moss Eater, спасибо за ответ.

Про BPL знаю, что там находятся скомпилированные стандарные модули из поставки Delphi. Т.е. в моем случае, получается, необходимо будет перекомпилировать какую-то BPL-ку. Это мне не совсем подходит, так как я отключил в проекте опцию "Build with runtime packages" и не хотел бы кроме EXE-шника своей проги распространять еще и переделанные BPL-ки.

Или Вы имели ввиду включить переделанный исходник InputQuery непосредственно в свою прогу? Скорее всего это мне подойдет.


Reindeer Moss Eater   (2007-11-13 18:13:00) [2]

Про bpl когда-нибудь слышал?

Свою реализацию InputQuery создай.


Shurup   (2007-11-13 18:08:00) [3]


> Ctrl+Mouse_Left покажет можно или нельзя

Подредактировал исходный текст function InputQuery в unit Dialogs.
В месте где создается форма, дописываю
 with Form do
   try
     // добавлено, отсюда
     Font.Size:=12;
     Font.Style:=[fsBold];
     // и досюда
     Canvas.Font := Font;

Но никакой реакции. Наверное, таки нельзя?


AlexanderMS   (2007-11-13 17:49:00) [4]


> Уж слишком мелкий шрифт у компонентов диалогового окна,
> вызываемого функцией InputBox. Как увеличить?

А не проще ли свой создать (там ведь и Caption английский)?


Reindeer Moss Eater   (2007-11-13 17:40:00) [5]

Ctrl+Mouse_Left покажет можно или нельзя.


Наверх

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