| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Delphi, Crystal Reports Print Engine (crpe32.dll) [D6, WinXP]

CRep ©   (2005-10-25 12:11:00) 

В поставке CR9 идет модуль CRDelphi, который является декларацией функций библиотеки CR Print Engine (crpe32.dll).
{******************************************************************************}
{ Callback Events                                                              }
{******************************************************************************}
const
 { event ID }
 PE_REFRESH_BUTTON_CLICKED_EVENT       = 16;

{ All Events are disabled by default; use PEEnableEvent to enable events }
type
 PEEnableEventInfo = record
   StructSize                 : Word;
   startStopEvent             : Smallint; {0 or 1, PE_UNCHANGED for no change}
   readingRecordEvent         : Smallint; {0 or 1, PE_UNCHANGED for no change}
   printWindowButtonEvent     : Smallint; {0 or 1, PE_UNCHANGED for no change}
   drillEvent                 : Smallint; {0 or 1, PE_UNCHANGED for no change}
   closePrintWindowEvent      : Smallint; {0 or 1, PE_UNCHANGED for no change}
   activatePrintWindowEvent   : Smallint; {0 or 1, PE_UNCHANGED for no change}
   fieldMappingEvent          : Smallint; {Bool value, PE_UNCHANGED for no change}
   mouseClickEvent            : Smallint; {Bool value, PE_UNCHANGED for no change}
   hyperlinkEvent             : Smallint; {Bool value, PE_UNCHANGED for no change}
   launchSeagateAnalysisEvent : Smallint; {Bool value, PE_UNCHANGED for no change}
 end;

const
 PE_SIZEOF_ENABLE_EVENT_INFO = SizeOf(PEEnableEventInfo);

function PEEnableEvent (
 printJob            : Smallint;
 var enableEventInfo : PEEnableEventInfo): Bool stdcall;

function PEGetEnableEventInfo (
 printJob            : Smallint;
 var enableEventInfo : PEEnableEventInfo): Bool stdcall;

{ Set callback function}
function PESetEventCallback (
 printJob     : Smallint;
 callbackProc : pointer;
 userData     : pointer): Bool stdcall;
 (*
 callbackProc function should be of form:
   function callbackProc (
     eventID : Smallint;  {event ID constant}
     param2  : pointer;   {pointer to Event structure for event ID}
     param3  : pointer    {user-defined pointer}
     ): Bool stdcall;
 *)  {should "export" be used for 16-bit callback?}

ВОПРОСЫ к Мастерам:
1. Как сделать чтобы Crystal обновил отчет (см. PE_REFRESH_BUTTON_CLICKED_EVENT)
2. Что такое Call Back Procedure, как их готовить и с чем подавать?

---

CRep   (2005-11-07 07:21:00) [1]

[TO evvcom]
Спасибо за совет, скачал компонент, действительно наглядная вещь!

---

evvcom   (2005-11-02 09:24:00) [2]

Я бы посоветовал скачать компонент CrystalVCL, с ним идет замечательная демонстрашка, по которой можно научиться всему при работе с Crystal

---

CRep   (2005-11-02 06:36:00) [3]

up

---

CRep   (2005-10-26 06:21:00) [4]

Удалено модератором
Примечание: Создание пустых сообщений

---

Наверх