Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Как в отчета задать ориентацию бумаги. / 5 сообщений из 5, страница 1 из 1
26.04.2005, 18:56
    #33036898
ГенГрум
ГенГрум
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как в отчета задать ориентацию бумаги.
Как в отчета задать ориентацию бумаги вне зависимости от установок принтера ? В ворде необходима ориентация книжная, а в фоксе альбомная.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.04.2005, 22:05
    #33037128
ВладимирМ
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как в отчета задать ориентацию бумаги.
В режиме модификации отчета пункт меню File - Page Setup - кнопка Print Setup.

Но если драйвер принтера, на котором создается отчет, отличен от драйвера принтера у клиента, то возможны глюки.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.04.2005, 19:27
    #33039255
ГенГрум
ГенГрум
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как в отчета задать ориентацию бумаги.
Спасибо ВладимирМ.
А системными перемеными или програмно установить нельзя?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.04.2005, 21:46
    #33039395
ВладимирМ
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как в отчета задать ориентацию бумаги.
ГенГрумА системными перемеными или програмно установить нельзя?
Системными переменными нельзя, а программно можно, если файл отчета не включен внутрь проекта. Т.е. поставляется клиенту как отдельный файл. Тогда

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
SELECT  0 
USE MyReport.frx
LOCATE FOR ObjCode= 53  AND ObjType= 1 
DO CASE
CASE NOT ("ORIENTATION=" $ MyReport.Expr)
	REPLACE Expr WITH IIF(EMPTY(MyReport.Expr),"",CHR( 13 )+CHR( 10 ))+;
			"ORIENTATION=1" ADDITIVE
CASE "ORIENTATION=0" $ MyReport.Expr
	REPLACE Expr WITH StrTran(MyReport.Expr,"ORIENTATION=0","ORIENTATION=1")
ENDCASE

Смысл в том, что файл отчета физически - это обычная DBF-таблица. Информацию об ориентации бумаги записана в записи со значениями полей ObjCode=53 AND ObjType=1 (обычно это первая запись) в поле с именем "Expr".

Там надо найти ключевое слово "ORIENTATION"

ORIENTATION=0 - ориентация портрет
ORIENTATION=1 - ориентация ландшафт

Хотя, особого смысла в этом нет. Разве что Вы программно будет формировать сам файл FRX.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.04.2005, 22:44
    #33039446
ГенГрум
ГенГрум
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как в отчета задать ориентацию бумаги.
спасибо за ответ. Попробую разобратся. А то неохота бегать и объясниять как настраивать принтер.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Как в отчета задать ориентацию бумаги. / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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