Форум » [x]Harbour » ANN: Вышел релиз FastReport for [x]Harbour » Ответить
ANN: Вышел релиз FastReport for [x]Harbour
Sergey Spirin: Здравствуйте. Рад сообщить, что вышел релиз FastReport for [x]Harbour. Как всегда, информацию можно посмотреть: http://www.paritetsoft.ru/frh.htm Возможным русскоязычных покупателей лучше контактировать со мной напрямую по email. Цена для оплаты в рублях банковским переводом по выставленному счету- 9999 рублей. -- Спирин Сергей. Компания "Паритет Софт". FRH sales: http://www.paritetsoft.ru/frh.htm FRAX sales: http://www.hotsoft.ru/ALASKA/frax_eng.htm
Andrey: Собрался делать новую форму и не знаю как поступить. Есть выборка по базе. Мне нужно на лист А4 печатать 1 запись из выборки. Причем если поле (допустим KVIEW) == 1, то это 1-шаблон, если == 2, то 2-шаблон ... и так до 4-шаблонов. Как такую штуку сделать ?
Sergey Spirin: Andrey пишет: Собрался делать новую форму и не знаю как поступить. Есть выборка по базе. Мне нужно на лист А4 печатать 1 запись из выборки. Причем если поле (допустим KVIEW) == 1, то это 1-шаблон, если == 2, то 2-шаблон ... и так до 4-шаблонов. Как такую штуку сделать ? Если шаблоны сильно разные, то мне кажется оптимальней будет так: FrPrn:SetWorkArea("MY_AREA", Select(), , {FR_RB_CURRENT, FR_RE_CURRENT , 0}) FrPrn:Clear() DO WHILE .NOT. Eof() IF KVIEW == 1 FrPrn:LoadFromFile(1.fr3) ENDIF IF KVIEW == 2 FrPrn:LoadFromFile(2.fr3) ENDIF ..................... FrPrn:PrepareReport(FR_NOTCLEARLASTREPORT) SKIP ENDDO FrPrn:ShowPreparedReport()
Andrey: Как реализовать следующию печать в терминалке хХарбора: Есть файл логотипа фирмы (logo.bmp) Нужно его считать и вставить в начало отчета (сразу нельзя, т.к. форма будет в разных фирмах).
Sergey Spirin: Andrey пишет: Есть файл логотипа фирмы (logo.bmp) Нужно его считать и вставить в начало отчета (сразу нельзя, т.к. форма будет в разных фирмах). Это очень просто, например, задайте обработчик OnBeforePrint oбъекту Picture: procedure Picture1OnBeforePrint(Sender: TfrxComponent); begin Picture1.Picture.LoadFromFile(GetHbVar('MyLogo')); end; Чтобы сделать обработчик, выберите объект, в инспекторе объектов выберите вкладку "События" и напротив нужного события в пустой ячейке двойной щелчок мышы.
Andrey: Видел FastReport по Дельфи. Там в верхней строке было размещены кнопки Экспорта в Word и Excel. И кнопка "выхода" была значком с "Дверью". Т.е. я так понимаю что этот параметр настраивается. Я хочу также сделать в хХарборе ! Как это реализуется ? Вдобавок ко всему все эти формы можно затолкать в ЕХЕ-ник. В некоторых случаях это очень удобно. Как можно сделать такое-же в хХарборе ?
Sergey Spirin: Здравствуйте, Андрей. Насчет дополнительных кнопок. Реализуется это только в Дельфи. В Харбуре вы можете только манипулировать количеством видимых кнопок. Насчет отчетов в EXE, это можно. Добавьте ваши отчеты к EXE как ресурс RCDATA. Для загрузки отчета :LoadFromResource()
Andrey: Sergey Spirin пишет: В Харбуре вы можете только манипулировать количеством видимых кнопок. А как ? Можно небольшой пример ? Sergey Spirin пишет: Добавьте ваши отчеты к EXE как ресурс RCDATA. Для загрузки отчета :LoadFromResource() Для примера: есть 2 отчета otchet1. и otchet2. Как будет выглядеть my.rc ? Как будет выглядеть вызов этих отчетов в моей программе ?
Sergey Spirin: По кнопкам, смотрите доку: FrPrn:PreviewOptions:SetButtons(FR_PB_PRINT + FR_PB_LOAD...) Ресурсы, rc: OTCHET1 RCDATA "otchet1.fr3" Вызов: FrPrn:LoadFromResource("OTCHET1")
Andrey: Спасибо большое !
Andrey: Не показывает иконку в FastReporte, а заголовок окна показывает ! Хотя в начале стоит показ иконки, может что неправильно ? //----------- Now load and init FastReport -------------------------------------- FrPrn := frReportManager():new() //---------- Set the same icon for FastReport windows---------- FrPrn:SetIcon( 1 ) //---------- Set the same title for FastReport taskBar-window FrPrn:SetTitle( _cTitle )
Sergey Spirin: Andrey пишет: //---------- Set the same icon for FastReport windows---------- FrPrn:SetIcon( 1 ) А есть ли у Вас в exe ресурс иконки, определенный числовым идентификатором 1? Иконка читается из ресурсов. И если такого ресурса нет, то и нет Кстати, удобнее даже определить в rc символьно, и тогда FrPrn:SetIcon( "MYICON" ) Минимальный код, который спрашивали в письме: FrPrn := frReportManager():new() FrPrn:SetWorkArea() -- если нужно, может не использоваться FrPrn:LoadFromFile() -- FromBlob(), FromResource(), Clear() - на выбор FrPrn:DesignReport()
Andrey: Sergey Spirin пишет: А есть ли у Вас в exe ресурс иконки, определенный числовым идентификатором 1? Конечно же нет ! Я так с Аляски взял и тупо переписал. Спасибо за подсказку. Sergey Spirin пишет: FrPrn := frReportManager():new() FrPrn:SetWorkArea() -- если нужно, может не использоваться FrPrn:LoadFromFile() -- FromBlob(), FromResource(), Clear() - на выбор FrPrn:DesignReport() А где взять описание этих функций, чтоб я каждый раз не приставал к вам ? Кинте пожалуйста ссылку.
Andrey: И еще по ходу один вопрос ! Если я использую только русский язык, то можно ли мне файл ресурсов-языка затолкать в мой RC файл ? Как будет выглядеть эта строка в RC файле, и как вызывать язык ввода FastReporta у меня в программе ? Спасибо заранее.
Sergey Spirin: Andrey пишет: А где взять описание этих функций, чтоб я каждый раз не приставал к вам ? Кинте пожалуйста ссылку. Текущая дока - http://www.paritetsoft.ru/downloads/UserManual_for_Xbase.zip Но она на английском. На русском есть старая для Аляски, но для основных методов она подойдет полностью: http://www.hotsoft.ru/ALASKA/FastReport.pdf Andrey пишет: И еще по ходу один вопрос ! Если я использую только русский язык, то можно ли мне файл ресурсов-языка затолкать в мой RC файл ? Как будет выглядеть эта строка в RC файле, и как вызывать язык ввода FastReporta у меня в программе ? Для этого ничего делать не надо, Ваша персональная копия уже русская. Если у Вас только русские приложения, никаких файлов загружать не надо.
Andrey: Есть ли FastReport для Linux ?
Sergey Spirin: Andrey пишет: Есть ли FastReport для Linux ? FastReport (не FRH) есть. Но похоже доживает свои последние дни, также как и Kylix (Delphi для Linux) на котором написан. Разработка клиентских приложений под Linux экономически нецелесоообразна (не я сказал).
Andrey: Sergey Spirin пишет: (не FRH) А много ли надо времени, чтобы его переделать под Linux ? Это так - чисто теоретически !!!
Sergey Spirin: Andrey пишет: А много ли надо времени, чтобы его переделать под Linux ? Это так - чисто теоретически !!! Не знаю. Я не в курсе организации динамических библиотек в Linux.
alkresin: Ну, вообще говоря, проблема здесь не в "организации динамических библиотек в Linux" ( это вообще не проблема ), а в подборе подходящего модуля ( библиотеки ) для печати и в переписывании всего вывода на печать под этот модуль, а лучше - создании промежуточного слоя, который мог работать и с этим модулем, и под Windows и обеспечил бы независимость от платформы основного кода. Это, действительно, может оказаться непростой задачей.
Sergey Spirin: alkresin пишет: Ну, вообще говоря, проблема здесь не в "организации динамических библиотек в Linux" ( это вообще не проблема ), а в подборе подходящего модуля ( библиотеки ) для печати и в переписывании всего вывода на печать под этот модуль, а лучше - создании промежуточного слоя, который мог работать и с этим модулем, и под Windows и обеспечил бы независимость от платформы основного кода. Это, действительно, может оказаться непростой задачей. Да вроде речь идет в контексте того, что уже "подобрали". Речь о FastReport CLX. И это продукт обеспечивающий весь жизненный цикл отчетов в Linux, от разработки до печати и экспорта. Поэтому никакой речи о "выборах и переписываниях" не ведется, достаточно давно все уже выбрано и переписано на высоком профессиональном уровне, в первую очередь Borland-ом (Kylix), во вторую FastReport Inc (CLX-версия). Поэтому, речь здесь только о возможности использования всего этого из Harbour-приложения под Linux. В Windows это реализовалось в виде компиляции FastReport как динамической библиотеки (как первый шаг к цели). И я не говорил проблема это или не проблема в Linux, я сказал, что я не в курсе, насколько это может быть проблематично. Но как я уже говорил, Borland остановил Kylix, заявив об отсутствии коммерческих переспектив, FastReport CLX "заморожен". Поэтому текущий разговор достаточно абстрактен.
полная версия страницы