powered by simpleCommunicator - 2.0.56     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Crystal Report количество напечатанных листов
6 сообщений из 6, страница 1 из 1
Crystal Report количество напечатанных листов
    #35577528
lexusXXX
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
необходимо вести учет напечатанных операторами страниц, печать отчетов ведеться с помощью Crystal Reports 10 в FoxPro 6. Как узнать количество отправленных на печать страниц?

Печать отчета делаю так:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
DBFPath='c:\REPORT\tab.dbf'
RPTPath='c:\REPORT\full_.rpt'
Fio='ПУПКИН ВАСИЛИЙ'

CRApplication = createobject ("CrystalRuntime.Application.10")
CRReport = CRApplication.OpenReport(RPTPath) 
CRReport.Database.Tables( 1 ).Location = DBFPath
CRReport.ParameterFields( 1 ).SetCurrentValue(Fio)

*kolprint = CRReport.PageCount() - в  8  кристале на основе олекантрола так работает в  10  нет...

CRReport.printout(.F.)
release CRReport
release CRApplication

Может можно как то по другому узнать количество напечатанных листов?
...
Рейтинг: 0 / 0
Crystal Report количество напечатанных листов
    #35577929
Kruchinin Pahan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
lexusXXXнеобходимо вести учет напечатанных операторами страниц, печать отчетов ведеться с помощью Crystal Reports 10 в FoxPro 6. Как узнать количество отправленных на печать страниц?

Печать отчета делаю так:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
DBFPath='c:\REPORT\tab.dbf'
RPTPath='c:\REPORT\full_.rpt'
Fio='ПУПКИН ВАСИЛИЙ'

CRApplication = createobject ("CrystalRuntime.Application.10")
CRReport = CRApplication.OpenReport(RPTPath) 
CRReport.Database.Tables( 1 ).Location = DBFPath
CRReport.ParameterFields( 1 ).SetCurrentValue(Fio)

*kolprint = CRReport.PageCount() - в  8  кристале на основе олекантрола так работает в  10  нет...

CRReport.printout(.F.)
release CRReport
release CRApplication

Может можно как то по другому узнать количество напечатанных листов?
lnPageTotal = CRReport.PrintingStatus.NumberOfPages
По идее, это должно заставить репорт отрендриться и рассчитать количество страниц.
...
Рейтинг: 0 / 0
Crystal Report количество напечатанных листов
    #35577977
lexusXXX
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kruchinin Pahan респект тебе и уважуха, все прекрасно работает! Спасибо.
...
Рейтинг: 0 / 0
Crystal Report количество напечатанных листов
    #35579085
вопр
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
В догонку вопрос по кристалу. Нет ли у кого случайно иерархии объектов для кристала 10 или 11? Для 8-ки есть описаловка на фоксхелпе, знаю и работаю их vfp с кристалом 9, а вот очень хочется посмотреть объекты последних кристалов и как с ними работать.
...
Рейтинг: 0 / 0
Crystal Report количество напечатанных листов
    #35579351
lexusXXX
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
вот я че то не смог найти описания методов и объектов Crystal 10, единственное как можно посматреть список свойств и методов, я делаю так в FoxPro 9 создаю объект в командном окне и открываю отчет а потом в опять же в командном окне смотрю список, ставлю точку и фокс выдает подсказку...

CRApplication = createobject ("CrystalRuntime.Application.10")
CRReport = CRApplication.OpenReport('c:\REPORT\full_.rpt')

CRReport.
...
Рейтинг: 0 / 0
Crystal Report количество напечатанных листов
    #35579352
Kruchinin Pahan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
lexusXXXвот я че то не смог найти описания методов и объектов Crystal 10, единственное как можно посматреть список свойств и методов, я делаю так в FoxPro 9 создаю объект в командном окне и открываю отчет а потом в опять же в командном окне смотрю список, ставлю точку и фокс выдает подсказку...

CRApplication = createobject ("CrystalRuntime.Application.10")
CRReport = CRApplication.OpenReport('c:\REPORT\full_.rpt')

CRReport.
rdcsdk_com_dg.chm входит в поставку 11 Developer
CrystalDevHelp.chm входит в поставку 10 (толи advanced, толи developer она тоже называлась).

Можно скачать с BusinessObjects

А для просмотра методов и свойств объектов можно использовать Tools \ Object Browser
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Crystal Report количество напечатанных листов
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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