:: Visual Foxpro, Foxpro for DOS
ScaleMode и размеры экрана
urfin
Автор

Сообщений: 328
Дата регистрации: 17.08.2004
VFP9 - релиз.

Создаю исполняемый файл из 2-х строк :

_SCREEN.ScaleMode = 0

MESSAGEBOX(STR(_SCREEN.Height)+STR(_SCREEN.Width))

Выполнение в ран-тайме VFP9 выдает запредельные значения размеров экрана в фокселях.

Сколько там звезд даже LOG10() - не знает

Хотя скомпиленный под VFP9Beta экзешник выдает типа 43 на 101.

Ошибка в релизе, или где

Нужно это мне для перевода пикселей в фоксели.

Перекомпилял проект с беты на релиз и напоролся

FUNCTION PixelToFoxel(@lnRow, @lnColumn)
LPARAMETERS tnRow AS Integer, tnColumn AS Integer
LOCAL lnFoxelHeight AS Integer, lnFoxelWidth AS Integer,;
lnPixelHeight AS Integer, lnPixelWidth AS Integer

IF _SCREEN.ScaleMode = 3 && 3 - Pixel
lnPixelHeight = _SCREEN.Height
lnPixelWidth = _SCREEN.Width
_SCREEN.ScaleMode = 0
lnFoxelHeight = _SCREEN.Height
lnFoxelWidth = _SCREEN.Width

* ТУТ УЖЕ ИМЕЕМ ДИКОЕ ЗНАЧЕНИЕ _SCREEN.Width

_SCREEN.ScaleMode = 3
ELSE && 0 - Foxel
lnFoxelHeight = _SCREEN.Height
lnFoxelWidth = _SCREEN.Width
_SCREEN.ScaleMode = 3
lnPixelHeight = _SCREEN.Height
lnPixelWidth = _SCREEN.Width
_SCREEN.ScaleMode = 0
ENDIF

tnRow = tnRow * lnFoxelHeight / lnPixelHeight
tnColumn = tnColumn * lnFoxelWidth / lnPixelWidth
RETURN




------------------
Ratings: 0 negative/0 positive
Re: ScaleMode и размеры экрана
piva

Сообщений: 18655
Откуда: Курган
Дата регистрации: 24.03.2004
Ну ScaleMode - Foxels зависит от установок фонта для формы - може у тебя шрифт 6 пунктов ?




------------------
Часто бывает так, что есть над чем задуматься, а нечем.
Ratings: 0 negative/0 positive
Re: ScaleMode и размеры экрана
piva

Сообщений: 18655
Откуда: Курган
Дата регистрации: 24.03.2004
Элементарный пример тебе все покажет

_SCREEN.ScaleMode = 0
_Screen.FontName='Arial'
_Screen.FontSize=8
? _SCREEN.Height,_SCREEN.Width
_Screen.FontSize=10
? _SCREEN.Height,_SCREEN.Width
_Screen.FontSize=14
? _SCREEN.Height,_SCREEN.Width
_Screen.FontSize=16
? _SCREEN.Height,_SCREEN.Width
_Screen.FontSize=20
? _SCREEN.Height,_SCREEN.Width




------------------
Часто бывает так, что есть над чем задуматься, а нечем.
Ratings: 0 negative/0 positive
Re: ScaleMode и размеры экрана
urfin
Автор

Сообщений: 328
Дата регистрации: 17.08.2004
Будем попытаться ...



Отредактировано (10.02.05 10:02)


------------------
Ratings: 0 negative/0 positive
Re: ScaleMode и размеры экрана
piva

Сообщений: 18655
Откуда: Курган
Дата регистрации: 24.03.2004
Виктор - ты хоть пробовал устанвливать фонт для Screen, а то может рантайм хватет какой-то свой ну типа _SCREEN.FontName='Arial'




------------------
Часто бывает так, что есть над чем задуматься, а нечем.
Ratings: 0 negative/0 positive
Re: ScaleMode и размеры экрана
PaulWist

Сообщений: 14601
Дата регистрации: 01.04.2004
Уж не знаю, правильно ли сделал (на бету накатил релиз), но вроде ехе из 2-х строк работает.
Version 09.00.0000.1720




------------------
Есть многое на свете, друг Горацио...
Что и не снилось нашим мудрецам.
(В.Шекспир Гамлет)
Ratings: 0 negative/0 positive
Re: ScaleMode и размеры экрана
urfin
Автор

Сообщений: 328
Дата регистрации: 17.08.2004
Точно, в рантайме беты дефолтный фонт скрина FixedSys - 12 , а в релизе FoxFont - 9
Спасибо за наводку
и всеж не ясно - какая ему разница



Отредактировано (10.02.05 10:11)


------------------
Ratings: 0 negative/0 positive
Re: ScaleMode и размеры экрана
AleksM

Сообщений: 17881
Дата регистрации: 11.11.2003
Привет, Паша.

Сам такого не делал, но в одном из постов Равиль писал что перед установкой лучше снести бету.




------------------
Лучше переесть, чем недоспать.
Не спеши, а то успеешь.
Ratings: 0 negative/0 positive
Re: ScaleMode и размеры экрана
PaulWist

Сообщений: 14601
Дата регистрации: 01.04.2004
Привет, Саша.

Может Равиль и прав, у меня не стал хелп, хотя About показывает всё корректно.




------------------
Есть многое на свете, друг Горацио...
Что и не снилось нашим мудрецам.
(В.Шекспир Гамлет)
Ratings: 0 negative/0 positive
Re: ScaleMode и размеры экрана
piva

Сообщений: 18655
Откуда: Курган
Дата регистрации: 24.03.2004
Виктор - разница в метрике фонтов




------------------
Часто бывает так, что есть над чем задуматься, а нечем.
Ratings: 0 negative/0 positive
Re: ScaleMode и размеры экрана
urfin
Автор

Сообщений: 328
Дата регистрации: 17.08.2004
Цитата:
Может Равиль и прав, у меня не стал хелп, хотя About показывает всё корректно.

И исче они там зачем-то vfpclean.app ложат - для любителей вкусных разноцветных таблеток наверное

Задолбали постоянные слеты настроек окон в гуе (что где и как расположено, придокано, в тулбар засунуто)

Конкретно : окно комманд и проекты.

Временами перестает запоминаться в foxuser. Лечится шаманством типа :

1) сделать не докабле - выйти.
2) сделать докабле и придочить - выйти.

Удаление foxuser не всегда помогат.

Лучше бы MS фокс борланду перепродал. Там бы довели IDE до совершенства.

На кой ляд мне таскпэйны с гэллерями и майнсвиперами, если окна в IDE банально не всегда сохраняют свое месторасположение ?

Думал в релизе исправят - дык нет. Седня убил час на эксперименты с foxuser.dbf

Не куплю девятку из вредности




------------------
Ratings: 0 negative/0 positive
Re: ScaleMode и размеры экрана
piva

Сообщений: 18655
Откуда: Курган
Дата регистрации: 24.03.2004
Цитата:
Не куплю девятку из вредности
Зато работать буду




------------------
Часто бывает так, что есть над чем задуматься, а нечем.
Ratings: 0 negative/0 positive
Re: ScaleMode и размеры экрана
piva

Сообщений: 18655
Откуда: Курган
Дата регистрации: 24.03.2004
Цитата:
Лучше бы MS фокс борланду перепродал.
Ага DBaseIV борланд тогда купил и что ? И где этот самый DbaseIV ? Уже бы давно на дельфях писали, а не нафоксе. Я тогда тоже сильно расстраивался, оказалось зря



------------------
Часто бывает так, что есть над чем задуматься, а нечем.
Ratings: 0 negative/0 positive
Re: ScaleMode и размеры экрана
urfin
Автор

Сообщений: 328
Дата регистрации: 17.08.2004
Цитата:
Зато работать буду

Все равно его не брошу - потому что он хороший

Мыши плакали кололись но продолжали жрать кактус

Цитата:
Ага DBaseIV борланд тогда купил и что ?

Ну пусть по найму доведут среду до ума, а движок не трогают



Отредактировано (10.02.05 10:53)


------------------
Ratings: 0 negative/0 positive
Re: ScaleMode и размеры экрана
urfin
Автор

Сообщений: 328
Дата регистрации: 17.08.2004
Цитата:
Уж не знаю, правильно ли сделал (на бету накатил релиз), но вроде ехе из 2-х строк работает.
Version 09.00.0000.1720

Дык этаж бета !!!

У релиза 09.00.0000.2412




------------------
Ratings: 0 negative/0 positive
Re: ScaleMode и размеры экрана
piva

Сообщений: 18655
Откуда: Курган
Дата регистрации: 24.03.2004
А у тебя все еще Новогоднее настроение в ожидании чуда и подарка ? http://piva.fatal.ru/smile/51.gif




------------------
Часто бывает так, что есть над чем задуматься, а нечем.
Ratings: 0 negative/0 positive
Re: ScaleMode и размеры экрана
urfin
Автор

Сообщений: 328
Дата регистрации: 17.08.2004
Цитата:
А у тебя все еще Новогоднее настроение в ожидании чуда и подарка ?

У меня вся жизнь - ожидание чудес и подарков

Хотя сам я - не подарок




------------------
Ratings: 0 negative/0 positive
Re: ScaleMode и размеры экрана
PaulWist

Сообщений: 14601
Дата регистрации: 01.04.2004
Цитата:
Дык этаж бета !!!
У релиза 09.00.0000.2412

Так About говорит Fox 9.0 я и не стал смотреть версию, а сейчас засомневался и оказывается не зря.

Так как ставить - срубить бету и потом или можно сразу.




------------------
Есть многое на свете, друг Горацио...
Что и не снилось нашим мудрецам.
(В.Шекспир Гамлет)
Ratings: 0 negative/0 positive
Re: ScaleMode и размеры экрана
urfin
Автор

Сообщений: 328
Дата регистрации: 17.08.2004
Цитата:
в рантайме беты дефолтный фонт скрина FixedSys - 12 , а в релизе FoxFont - 9

Похоже дело не в метриках.

Демонстрирую силу воды :

1) В среде разработки релиза VFP9, в окне Command, наберите и выполните строку _SCREEN.FontName = 'FoxFont'
2) Далее открываем окно Properties-DeskTop и ...
3) Я насчитал 12 свойств объекта _SCREEN со значением вида : ******************
4) Для усиления эффекта можно попытаться вывести что-либо на экран посредством оператора "?"

Похоже очередная баго-фича




------------------
Ratings: 0 negative/0 positive
Re:
urfin
Автор

Сообщений: 328
Дата регистрации: 17.08.2004
Цитата:
Так как ставить - срубить бету и потом или можно сразу.

Надо рубить [sm048]




------------------
Ratings: 0 negative/0 positive


Извините, только зарегистрированные пользователи могут оставлять сообщения в этом форуме.

On-line: 24 OlegA  (Гостей: 23)

© 2000-2024 Fox Club 
Яндекс.Метрика