Как перевести твипы в пиксели?

Программирование на Visual Basic for Applications
jiura
Бывалый
Бывалый
 
Сообщения: 217
Зарегистрирован: 16.02.2002 (Сб) 0:02
Откуда: Russia

Как перевести твипы в пиксели?

Сообщение jiura » 11.08.2007 (Сб) 16:12

Подскажите, пожалуйста, как в VBA перевести твипы в пиксели. Хочу сделать Microsoft FlexGrid с вводом текста. А для того чтобы перемещать textbox по Grid-у необходимо знать Left и Top ячеек, которые заданы на твипах. Свойства ScaleX, ScaleY, Screen в VBA отсутствуют, а переводить надо.
Заранее спасибо.

P.S. Может кто-нить это уже пытался сделать и у него возникнет вопрос о том, что TextBox на grid-е не отображается. Я поместил TExtBox на Frame, а Frame на Grid.
------------------------
Тихо! Пока админы не узнали!

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Re: Как перевести твипы в пиксели?

Сообщение GSerg » 11.08.2007 (Сб) 18:48

jiura писал(а):Подскажите, пожалуйста, как в VBA перевести твипы в пиксели.

tw*GetDeviceCaps(LOGPIXELSX)/1440
tw*GetDeviceCaps(LOGPIXELSY)/1440

jiura писал(а):P.S. Может кто-нить это уже пытался сделать и у него возникнет вопрос о том, что TextBox на grid-е не отображается. Я поместил TExtBox на Frame, а Frame на Grid.

А просто bring to front или zorder 0 не помогает, нет?
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 66

    TopList