Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Перевод пиксельных координат в текстовые / 4 сообщений из 4, страница 1 из 1
19.03.2004, 10:17
    #32448602
chel99
chel99
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Перевод пиксельных координат в текстовые
Кто подскажет как переводить пиксельные координаты, которые применяются
в VFP (свойства Control.Left, Control.Top и т.д.) в текстовые, применяемые для
команд @say, @get и т.д. и наоборот.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.03.2004, 10:56
    #32448731
po2
po2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Перевод пиксельных координат в текстовые
В VFP используются две связанные единицы для системы координат - Pixels и Foxels, связанные соотношением средней ширины шрифта используемого на форме, с учетом атрибутов Bold и Italic.
Для перевода пикселей в фоксели нужно выполнить деление:
Код: plaintext
1.
2.
3.
4.
5.
6.
with ThisForm
priv cFontStyle
cFontStyle =''
cFontStyle = cFontSyle + iif(.FontItalic,'I','')+iif(.FontBold,'B',cFontStyle)
cFontStyle = iif(empt(cFontStyle),'N',cFontStyle)
.cmd.LeftInFoxels = .cmd.Left/FONTMETRIC( 6 ,.FontName,.FontSize,cFontStyle)
endw
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.03.2004, 10:58
    #32448740
NNN
NNN
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Перевод пиксельных координат в текстовые
SCOLS() - ширина экрана в фокселях
_screen.Width - ширина экрана в пикселях
SROWS() - высота экрана в фокселях
_screen.Height - высота экрана в пикселях
Соответственно берешь нужное соотношение
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.03.2004, 12:02
    #32448937
chel99
chel99
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Перевод пиксельных координат в текстовые
Спасибо!
Уже нашел решение. Использую функции wrows() и wcols() :
from_y_=(from_y / thisform.Height) * wrows()
from_x_=(from_x / thisform.Width) * wcols()

Здесь from_y_ и from_x_ координаты в фокселях, а from_y, from_x - в пикселях.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Перевод пиксельных координат в текстовые / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]