|
Delta
|
|
Нужно изменять размер шрифта в ActiveX в зависимости от размера самого ActiveX11.01.2008, 10:51. Показов 2262. Ответов 2
Метки нет (Все метки)
Уважаемые,
обратите пожалуйста внимание на вчерашний постинг под сабжем 'ActiveX - динамич. изменение шрифта и DragDrop. Помогите, очень нужно!'. Я, наверно, тупые вопросы задаю, что же делать, ну простите чайника. Очень нужно изменять размер шрифта в ActiveX в зависимости от размера самого ActiveX (событие Resize). Изменять размер шрифта пропорционально изменению размера ActiveX не совсем корректно - размер текста менятеся непропорционально и либо не влезает в текстовое поле, либо слишком короткий. Мне кажется, нужно определять фактические размеры текста в twips и подгонять под размеры ActiveX. Кроме того, нужно динамически определять число колонок в ListBox. Только как определить фактические размеры текста в twips? И еще: где можно посмотреть примеры использования API-функций GetCharWidth, GetCharWidth32 и т.п. (в MSDN уже был, но не нашел)? |
|
| 11.01.2008, 10:51 | |
|
Ответы с готовыми решениями:
2
ActiveX и VB, получение значения из ActiveX Изменить поведение ActiveX-компонента в зависимости от нажатия кнопок Как автоматически изменять размер текста в spinner в зависимости от размера экрана? |
|
YURA
|
|
| 13.01.2008, 09:57 | |
|
>>>в MSDN уже был, но не нашел
Однако, ищите дальше(Можете еще Appleman'а почитать - где-то здесь рекламируют(Выбери и купи-380р.(Хотя где-то я его на Download виде(по аглицки, правда(да и давно это было))))) Обратите внимание на испольозвание методов ScaleX и ScaleY(например, их реализует объект Form) Но размер шрифта более связан с высотой его символов, выраженной в точках(Point), а ширину(причем расширенную) символа действительно можно определить посредством GetCharWidth32(для моноширинных шрифтов это даже поможет). Declare Function GetCharWidth& Lib 'gdi32' Alias 'GetCharWidthA' (ByVal hDC As_ Long, ByVal iFirstChar As Long, ByVal iLastChar As Long, lpBuffer As Long) Declare Function GetCharWidth32& Lib 'gdi32' Alias 'GetCharWidth32A' (ByVal hdc_ As Long, ByVal iFirstChar As Long, ByVal iLastChar As Long, lpBuffer As Long) Declare Function GetCharWidthFloat& Lib 'gdi32' Alias 'GetCharWidthFloatA'_ (ByVal hdc As Long, ByVal iFirstChar As Long, ByVal iLastChar As Long, pxBuffer As Single) P.S. мне и самому интересно, все ли скобки я закрыл...
|
|
|
Delta
|
|
| 13.01.2008, 10:40 | |
|
За пример спасибо, книгу поищу. А можно пример использования функции (кусок кода)?
|
|
| 13.01.2008, 10:40 | |
|
Помогаю со студенческими работами здесь
3
ActiveX Bridje или как превращать ActiveX Control в JavaBean. Сделать размер шрифта приложения инвариантным по отношению к системным настройкам размера шрифта
Изменять размер формы в зависимости от текста в Label
Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |
|
Новые блоги и статьи
|
|||
|
Первый деплой
lagorue 16.01.2026
Не спеша развернул своё 1ое приложение в kubernetes.
А дальше мне интересно создать 1фронтэнд приложения и 2 бэкэнд приложения
развернуть 2 деплоя в кубере получится 2 сервиса и что-бы они. . .
|
Расчёт переходных процессов в цепи постоянного тока
igorrr37 16.01.2026
/ *
Дана цепь постоянного тока с R, L, C, k(ключ), U, E, J. Программа составляет систему уравнений по 1 и 2 законам
Кирхгофа, решает её и находит токи на L и напряжения на C в установ. режимах до и. . .
|
Восстановить юзерскрипты Greasemonkey из бэкапа браузера
damix 15.01.2026
Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым.
Но восстановить их можно так.
Для этого понадобится консольная утилита. . .
|
Изучаю kubernetes
lagorue 13.01.2026
А пригодятся-ли мне знания kubernetes в России?
|
|
Сукцессия микоризы: основная теория в виде двух уравнений.
anaschu 11.01.2026
https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/
|
WordPad для Windows 11
Jel 10.01.2026
WordPad для Windows 11
— это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .
|
Classic Notepad for Windows 11
Jel 10.01.2026
Old Classic Notepad for Windows 11
Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .
|
Почему дизайн решает?
Neotwalker 09.01.2026
В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .
|