55 lines
999 B
ObjectPascal
55 lines
999 B
ObjectPascal
|
|
{******************************************}
|
|
{ }
|
|
{ FastReport VCL }
|
|
{ PDF components registration }
|
|
{ }
|
|
{ Copyright (c) 1998-2021 }
|
|
{ by Fast Reports Inc. }
|
|
{ }
|
|
{******************************************}
|
|
|
|
unit frxPDFReg;
|
|
|
|
{$I frx.inc}
|
|
|
|
interface
|
|
|
|
procedure Register;
|
|
|
|
implementation
|
|
|
|
uses
|
|
{$IFNDEF Linux}
|
|
Windows,
|
|
{$ELSE}
|
|
LCLType, LCLIntf, LCLProc,
|
|
{$ENDIF}
|
|
Messages, SysUtils, Classes, Controls
|
|
{$IFNDEF Delphi6}
|
|
, DsgnIntf
|
|
{$ELSE}
|
|
{$IFNDEF FPC}
|
|
, DesignIntf, DesignEditors
|
|
{$ENDIF}
|
|
{$ENDIF}
|
|
{$IFDEF FPC}
|
|
, LResources
|
|
{$ENDIF}
|
|
, frxPDFViewer;
|
|
|
|
procedure Register;
|
|
begin
|
|
RegisterComponents('FastReport VCL', [TfrxPDFObject]);
|
|
{$IFDEF DELPHI16}
|
|
// GroupDescendentsWith(TfrxPDFComponent, TControl);
|
|
{$ENDIF}
|
|
end;
|
|
|
|
{$IFDEF FPC}
|
|
initialization
|
|
{$INCLUDE frxRegPDFLaz.lrs}
|
|
{$ENDIF}
|
|
|
|
end.
|