expertcad/POWERCAD30/Plugin Source/PCPlgLib.pas

unit PCPlgLib;


interface

uses
  SysUtils,Classes,Windows;

type

TDoublePoint = record
  x: Double;
  y: Double;
end;

TDoubleRect = record
  Left: Double;
  Top: Double;
  Right:Double;
  Bottom: Double;
end;


TPCGETPROPDOTSPERMIL=Function:Double;stdcall;
TPCGETPROPLOCKED=Function:LongInt;stdcall;
TPCSETPROPLOCKED=Procedure(Value:LongInt);stdcall;
TPCGETPROPUPDATED=Function:LongInt;stdcall;
TPCSETPROPUPDATED=Procedure(Value:LongInt);stdcall;
TPCGETPROPAUTOREFRESH=Function:LongInt;stdcall;
TPCSETPROPAUTOREFRESH=Procedure(Value:LongInt);stdcall;
TPCGETPROPRULERVISIBLE=Function:LongInt;stdcall;
TPCSETPROPRULERVISIBLE=Procedure(Value:LongInt);stdcall;
TPCGETPROPVERTICALZERO=Function:Integer;stdcall;
TPCSETPROPVERTICALZERO=Procedure(Value:Integer);stdcall;
TPCGETPROPHORIZONTALZERO=Function:Integer;stdcall;
TPCSETPROPHORIZONTALZERO=Procedure(Value:Integer);stdcall;
TPCGETPROPTOOLIDX=Function:Integer;stdcall;
TPCGETPROPTOOLINFO=Function:PChar;stdcall;
TPCGETPROPTOOLDATA=Function:Integer;stdcall;
TPCGETPROPDOTSPERMILORIG=Function:Double;stdcall;
TPCSETPROPDOTSPERMILORIG=Procedure(Value:Double);stdcall;
TPCGETPROPACTIVELAYER=Function:Integer;stdcall;
TPCSETPROPACTIVELAYER=Procedure(Value:Integer);stdcall;
TPCGETPROPZOOMSCALE=Function:Integer;stdcall;
TPCSETPROPZOOMSCALE=Procedure(Value:Integer);stdcall;
TPCGETPROPGUIDESVISIBLE=Function:LongInt;stdcall;
TPCSETPROPGUIDESVISIBLE=Procedure(Value:LongInt);stdcall;
TPCGETPROPBACKGROUND=Function:Integer;stdcall;
TPCSETPROPBACKGROUND=Procedure(Value:Integer);stdcall;
TPCGETPROPPAGECOLOR=Function:Integer;stdcall;
TPCSETPROPPAGECOLOR=Procedure(Value:Integer);stdcall;
TPCGETPROPGRIDS=Function:LongInt;stdcall;
TPCSETPROPGRIDS=Procedure(Value:LongInt);stdcall;
TPCGETPROPGRIDTYPE=Function:Integer;stdcall;
TPCSETPROPGRIDTYPE=Procedure(Value:Integer);stdcall;
TPCGETPROPCENTERGUIDE=Function:LongInt;stdcall;
TPCSETPROPCENTERGUIDE=Procedure(Value:LongInt);stdcall;
TPCGETPROPPAGEGUIDE=Function:LongInt;stdcall;
TPCSETPROPPAGEGUIDE=Procedure(Value:LongInt);stdcall;
TPCGETPROPDRAWSHADOW=Function:LongInt;stdcall;
TPCSETPROPDRAWSHADOW=Procedure(Value:LongInt);stdcall;
TPCGETPROPDRAWPAGEBORDER=Function:LongInt;stdcall;
TPCSETPROPDRAWPAGEBORDER=Procedure(Value:LongInt);stdcall;
TPCGETPROPGRIDCOLOR=Function:Integer;stdcall;
TPCSETPROPGRIDCOLOR=Procedure(Value:Integer);stdcall;
TPCGETPROPGUIDECOLOR=Function:Integer;stdcall;
TPCSETPROPGUIDECOLOR=Procedure(Value:Integer);stdcall;
TPCGETPROPRULERCOLOR=Function:Integer;stdcall;
TPCSETPROPRULERCOLOR=Procedure(Value:Integer);stdcall;
TPCGETPROPGRIDSTEP=Function:Double;stdcall;
TPCSETPROPGRIDSTEP=Procedure(Value:Double);stdcall;
TPCGETPROPWORKHEIGHT=Function:Double;stdcall;
TPCSETPROPWORKHEIGHT=Procedure(Value:Double);stdcall;
TPCGETPROPWORKWIDTH=Function:Double;stdcall;
TPCSETPROPWORKWIDTH=Procedure(Value:Double);stdcall;
TPCGETPROPPAGELAYOUT=Function:Integer;stdcall;
TPCSETPROPPAGELAYOUT=Procedure(Value:Integer);stdcall;
TPCGETPROPPAGEORIENT=Function:Integer;stdcall;
TPCSETPROPPAGEORIENT=Procedure(Value:Integer);stdcall;
TPCGETPROPGUIDETRACE=Function:Integer;stdcall;
TPCSETPROPGUIDETRACE=Procedure(Value:Integer);stdcall;
TPCGETPROPSNAPTOGUIDES=Function:LongInt;stdcall;
TPCSETPROPSNAPTOGUIDES=Procedure(Value:LongInt);stdcall;
TPCGETPROPSNAPTONEARPOINT=Function:LongInt;stdcall;
TPCSETPROPSNAPTONEARPOINT=Procedure(Value:LongInt);stdcall;
TPCGETPROPSNAPTOGRIDS=Function:LongInt;stdcall;
TPCSETPROPSNAPTOGRIDS=Procedure(Value:LongInt);stdcall;
TPCGETPROPSCROLLBARS=Function:LongInt;stdcall;
TPCSETPROPSCROLLBARS=Procedure(Value:LongInt);stdcall;
TPCGETPROPRULERSYSTEM=Function:Integer;stdcall;
TPCSETPROPRULERSYSTEM=Procedure(Value:Integer);stdcall;
TPCGETPROPDRAWINCURSOR=Function:LongInt;stdcall;
TPCSETPROPDRAWINCURSOR=Procedure(Value:LongInt);stdcall;
TPCGETPROPREALSCALE=Function:LongInt;stdcall;
TPCSETPROPREALSCALE=Procedure(Value:LongInt);stdcall;
TPCGETPROPMETRICMODE=Function:Integer;stdcall;
TPCSETPROPMETRICMODE=Procedure(Value:Integer);stdcall;
TPCGETPROPANGULARMODE=Function:Integer;stdcall;
TPCSETPROPANGULARMODE=Procedure(Value:Integer);stdcall;
TPCGETPROPWMFPRINTING=Function:LongInt;stdcall;
TPCSETPROPWMFPRINTING=Procedure(Value:LongInt);stdcall;
TPCGETPROPDEFAULTPENCOLOR=Function:Integer;stdcall;
TPCSETPROPDEFAULTPENCOLOR=Procedure(Value:Integer);stdcall;
TPCGETPROPDEFAULTBRUSHCOLOR=Function:Integer;stdcall;
TPCSETPROPDEFAULTBRUSHCOLOR=Procedure(Value:Integer);stdcall;
TPCGETPROPDEFAULTPENWIDTH=Function:Integer;stdcall;
TPCSETPROPDEFAULTPENWIDTH=Procedure(Value:Integer);stdcall;
TPCGETPROPDEFAULTPENSTYLE=Function:Integer;stdcall;
TPCSETPROPDEFAULTPENSTYLE=Procedure(Value:Integer);stdcall;
TPCGETPROPDEFAULTBRUSHSTYLE=Function:Integer;stdcall;
TPCSETPROPDEFAULTBRUSHSTYLE=Procedure(Value:Integer);stdcall;
TPCGETPROPDEFAULTROWSTYLE=Function:Integer;stdcall;
TPCSETPROPDEFAULTROWSTYLE=Procedure(Value:Integer);stdcall;
TPCGETPROPDEFAULTTEXTHEIGHT=Function:Double;stdcall;
TPCSETPROPDEFAULTTEXTHEIGHT=Procedure(Value:Double);stdcall;
TPCGETPROPDEFAULTTEXTRATIO=Function:Double;stdcall;
TPCSETPROPDEFAULTTEXTRATIO=Procedure(Value:Double);stdcall;
TPCGETPROPDEFAULTPLINECLOSED=Function:LongInt;stdcall;
TPCSETPROPDEFAULTPLINECLOSED=Procedure(Value:LongInt);stdcall;
TPCGETPROPDEFAULTARCSTYLE=Function:Integer;stdcall;
TPCSETPROPDEFAULTARCSTYLE=Procedure(Value:Integer);stdcall;
TPCGETPROPLAYERCOUNT=Function:Integer;stdcall;
TPCGETPROPFIGURECOUNT=Function:Integer;stdcall;
TPCGETPROPSELECTEDCOUNT=Function:Integer;stdcall;
TPCGETPROPMAPSCALE=Function:Integer;stdcall;
TPCSETPROPMAPSCALE=Procedure(Value:Integer);stdcall;
TPCGETPROPRESCALETOMAP=Function:Integer;stdcall;
TPCSETPROPRESCALETOMAP=Procedure(Value:Integer);stdcall;
TPCGETPROPAUTOSELECT=Function:LongInt;stdcall;
TPCSETPROPAUTOSELECT=Procedure(Value:LongInt);stdcall;
TPCGETPROPKEYCOMMANDS=Function:LongInt;stdcall;
TPCSETPROPKEYCOMMANDS=Procedure(Value:LongInt);stdcall;
TPCGETPROPRECORDUNDO=Function:LongInt;stdcall;
TPCSETPROPRECORDUNDO=Procedure(Value:LongInt);stdcall;
TPCGETPROPUNDOCOUNT=Function:Integer;stdcall;
TPCSETPROPUNDOCOUNT=Procedure(Value:Integer);stdcall;
TPCGETPROPDEFAULTPICTUREFOLDER=Function:PChar;stdcall;
TPCSETPROPDEFAULTPICTUREFOLDER=Procedure(Value:PChar);stdcall;
TPCGETPROPSAVEWITHPREVIEW=Function:LongInt;stdcall;
TPCSETPROPSAVEWITHPREVIEW=Procedure(Value:LongInt);stdcall;
TPCGETPROPRULERMODE=Function:Integer;stdcall;
TPCSETPROPRULERMODE=Procedure(Value:Integer);stdcall;
TPCGETPROPZOOMRECT=Function:LongInt;stdcall;
TPCSETPROPZOOMRECT=Procedure(Value:LongInt);stdcall;
TPCGETPROPRANGECHECK=Function:LongInt;stdcall;
TPCSETPROPRANGECHECK=Procedure(Value:LongInt);stdcall;
TPCGETPROPAUTOTILEPRINT=Function:LongInt;stdcall;
TPCSETPROPAUTOTILEPRINT=Procedure(Value:LongInt);stdcall;
TPCGETPROPFIGUREGUIDES=Function:LongInt;stdcall;
TPCSETPROPFIGUREGUIDES=Procedure(Value:LongInt);stdcall;
TPCGETPROPNATIVEFILL=Function:LongInt;stdcall;
TPCSETPROPNATIVEFILL=Procedure(Value:LongInt);stdcall;
TPCGETPROPACTIVEFILE=Function:PChar;stdcall;
TPCSETPROPACTIVEFILE=Procedure(Value:PChar);stdcall;
TPCGETPROPCURRENTCOLOR=Function:Integer;stdcall;
TPCSETPROPCURRENTCOLOR=Procedure(Value:Integer);stdcall;
TPCGETPROPCURRENTSTYLE=Function:Byte;stdcall;
TPCSETPROPCURRENTSTYLE=Procedure(Value:Byte);stdcall;
TPCGETPROPCURRENTSTRING=Function:PChar;stdcall;
TPCSETPROPCURRENTSTRING=Procedure(Value:PChar);stdcall;
TPCGETPROPCURRENTFLAG=Function:LongInt;stdcall;
TPCSETPROPCURRENTFLAG=Procedure(Value:LongInt);stdcall;
TPCGETPROPCURRENTFILENAME=Function:PChar;stdcall;
TPCSETPROPCURRENTFILENAME=Procedure(Value:PChar);stdcall;
TPCGETPROPCURRENTVALUE=Function:Double;stdcall;
TPCSETPROPCURRENTVALUE=Procedure(Value:Double);stdcall;
TPCGETPROPFILEEXTENSION=Function:PChar;stdcall;
TPCSETPROPFILEEXTENSION=Procedure(Value:PChar);stdcall;
TPCGETPROPMULTISELECT=Function:LongInt;stdcall;
TPCSETPROPMULTISELECT=Procedure(Value:LongInt);stdcall;
TPCGETPROPOPENDIALOGTITLE=Function:PChar;stdcall;
TPCSETPROPOPENDIALOGTITLE=Procedure(Value:PChar);stdcall;
TPCGETPROPOPENDIALOGFILTER=Function:PChar;stdcall;
TPCSETPROPOPENDIALOGFILTER=Procedure(Value:PChar);stdcall;
TPCGETPROPSAVEDIALOGTITLE=Function:PChar;stdcall;
TPCSETPROPSAVEDIALOGTITLE=Procedure(Value:PChar);stdcall;
TPCGETPROPSAVEDIALOGFILTER=Function:PChar;stdcall;
TPCSETPROPSAVEDIALOGFILTER=Procedure(Value:PChar);stdcall;
TPCGETPROPACCEPTFILES=Function:Integer;stdcall;
TPCSETPROPACCEPTFILES=Procedure(Value:Integer);stdcall;
TPCGETPROPMOUSECOMMANDS=Function:LongInt;stdcall;
TPCSETPROPMOUSECOMMANDS=Procedure(Value:LongInt);stdcall;
TPCGETPROPPOPSTYLE=Function:Integer;stdcall;
TPCSETPROPPOPSTYLE=Procedure(Value:Integer);stdcall;
TPCGETPROPCUSTOMPOPITEMS=Function:PChar;stdcall;
TPCSETPROPCUSTOMPOPITEMS=Procedure(Value:PChar);stdcall;
TPCGETPROPMIRRORSTRAIGHT=Function:LongInt;stdcall;
TPCSETPROPMIRRORSTRAIGHT=Procedure(Value:LongInt);stdcall;
TPCGETPROPDRAWINGPOP=Function:LongInt;stdcall;
TPCSETPROPDRAWINGPOP=Procedure(Value:LongInt);stdcall;
TPCPRINTMESSAGEMETHOD=Procedure (Mes:PChar);stdcall;
TPCREFRESHMETHOD=Procedure ;stdcall;
TPCCLIENTTOSCREENMETHOD= Function (var Point:TPoint):TPoint;stdcall;
TPCSCREENTOCLIENTMETHOD= Function (var Point:TPoint):TPoint;stdcall;
TPCSETCUSTOMSURFACEMETHOD=Procedure (CWindow:Integer;CDC:Integer);stdcall;
TPCDORESIZEMETHOD=Procedure ;stdcall;
TPCSAVESCROLLMETHOD=Procedure ;stdcall;
TPCRESTORESCROLLMETHOD=Procedure ;stdcall;
TPCRELOCATEMETHOD=Procedure ;stdcall;
TPCDOSURFACEMOVEMETHOD=Procedure (Shift:Integer;X:Integer;Y:Integer);stdcall;
TPCDOSURFACECLICKMETHOD=Procedure ;stdcall;
TPCDOSURFACEDBLCLICKMETHOD=Procedure ;stdcall;
TPCDOSURFACELEAVEMETHOD=Procedure ;stdcall;
TPCDOSURFACEDRAGDROPMETHOD=Procedure (Source:Integer;X:Integer;Y:Integer);stdcall;
TPCDOSURFACEPULLMETHOD=Procedure (Button:Integer;Shift:Integer;X:Integer;Y:Integer);stdcall;
TPCDOSURFACEPUSHMETHOD=Procedure (Button:Integer;Shift:Integer;X:Integer;Y:Integer);stdcall;
TPCDOSURFACEWHEELMETHOD=Procedure (Shift:Integer;WheelDelta:Integer;X:Integer;Y:Integer);stdcall;
TPCDOKEYSTROKEMETHOD= Function (ChCode:Integer;Shift:Integer):LongInt;stdcall;
TPCCHECKFORGUIDEDROPMETHOD= Function (X:Integer;Y:Integer):LongInt;stdcall;
TPCDRAGSTARTEDMETHOD=Procedure ;stdcall;
TPCGETSELECTIONRECTMETHOD= Function :TDoubleRect;stdcall;
TPCGETDRAWINGRECTMETHOD= Function :TDoubleRect;stdcall;
TPCGETVISIBLERECTMETHOD= Function :TDoubleRect;stdcall;
TPCDECONVERTXYMETHOD=Procedure (var X:Double;var Y:Double;var Z:Double);stdcall;
TPCDECONVERTDIMMETHOD=Procedure (var Dime:Double);stdcall;
TPCCONVERTXYMETHOD=Procedure (var X:Double;var Y:Double;var Z:Double);stdcall;
TPCCONVERTDIMMETHOD=Procedure (var Dime:Double);stdcall;
TPCZOOMAREAMETHOD=Procedure (var ZoomRect:TDoubleRect);stdcall;
TPCFITTOWINDOWMETHOD=Procedure ;stdcall;
TPCACTUALSIZEMETHOD=Procedure ;stdcall;
TPCZOOMOUTMETHOD=Procedure ;stdcall;
TPCZOOMINMETHOD=Procedure ;stdcall;
TPCCLEARGUIDESMETHOD=Procedure ;stdcall;
TPCSETTOOLMETHOD=Procedure (aToolIndex:Integer;aToolInfo:PChar;aToolData:Integer);stdcall;
TPCSETCURSORMETHOD=Procedure (cr:Integer);stdcall;
TPCSETDRAGCURSORMETHOD=Procedure (cr:Integer);stdcall;
TPCCHECKGUIDELINEMETHOD= Function (x:Double;y:Double):LongInt;stdcall;
TPCBEGINHRULERDRAGMETHOD=Procedure ;stdcall;
TPCBEGINVRULERDRAGMETHOD=Procedure ;stdcall;
TPCSURFACEWIDTHMETHOD= Function :Integer;stdcall;
TPCSURFACEHEIGHTMETHOD= Function :Integer;stdcall;
TPCGETPAGERECTMETHOD=Procedure (var left:Integer;var top:Integer;var right:Integer;var bottom:Integer);stdcall;
TPCSETSURFACEMARGINMETHOD=Procedure (Value:Integer);stdcall;
TPCSETSCROLLPOSITIONSMETHOD=Procedure (hPos:Integer;vPos:Integer);stdcall;
TPCSETHSCROLLPOSITIONMETHOD=Procedure (hPos:Integer;Update:LongInt);stdcall;
TPCSETVSCROLLPOSITIONMETHOD=Procedure (vPos:Integer;Update:LongInt);stdcall;
TPCSETHSCROLLDELTAMETHOD=Procedure (hDelta:Double;Update:LongInt);stdcall;
TPCSETVSCROLLDELTAMETHOD=Procedure (hDelta:Double;Update:LongInt);stdcall;
TPCHSCBARPOSITIONMETHOD= Function :Integer;stdcall;
TPCVSCBARPOSITIONMETHOD= Function :Integer;stdcall;
TPCPOINTINHSCROLLMETHOD= Function (x:Double;y:Double):LongInt;stdcall;
TPCPOINTINVSCROLLMETHOD= Function (x:Double;y:Double):LongInt;stdcall;
TPCPOINTINHRULERMETHOD= Function (x:Double;y:Double):LongInt;stdcall;
TPCPOINTINVRULERMETHOD= Function (x:Double;y:Double):LongInt;stdcall;
TPCCENTERLOCATIONMETHOD=Procedure (x:Double;y:Double);stdcall;
TPCPOINTINVIEWMETHOD= Function (x:Double;y:Double):LongInt;stdcall;
TPCZOOMDETAILPOINTMETHOD=Procedure (var ZoomCenter:TDoublePoint);stdcall;
TPCHITTESTMODPOINTINTMETHOD= Function (x:Double;y:Double):Integer;stdcall;
TPCSIMULATETRACEMETHOD=Procedure (x:Double;y:Double);stdcall;
TPCSIMULATEDOWNMETHOD=Procedure (x:Double;y:Double);stdcall;
TPCSIMULATEUPMETHOD=Procedure (x:Double;y:Double);stdcall;
TPCSIMULATERIGHTCLICKMETHOD=Procedure (x:Double;y:Double);stdcall;
TPCSETSELECTIONHATCHMETHOD=Procedure (HStyle:Integer;ForeColor:Integer;BackColor:Integer;StepSize:Double);stdcall;
TPCSETSELECTIONGRADIENTMETHOD=Procedure (GStyle:Integer;ForeColor:Integer;BackColor:Integer);stdcall;
TPCSETSELECTIONTEXTUREMETHOD=Procedure (TStyle:Integer;TexSize:Integer);stdcall;
TPCNEWLAYERMETHOD= Function (LayerName:PChar):Integer;stdcall;
TPCDELETELAYERMETHOD= Function (LayerName:PChar):LongInt;stdcall;
TPCDELETELAYERWITHNBRMETHOD= Function (LayerNbr:Integer):LongInt;stdcall;
TPCDELETEALLUSERLAYERSMETHOD=Procedure ;stdcall;
TPCUNDOMETHOD=Procedure ;stdcall;
TPCREDOMETHOD=Procedure ;stdcall;
TPCCLEARUNDOLISTMETHOD=Procedure ;stdcall;
TPCSHOWLAYERMETHOD=Procedure (LayerNbr:Integer);stdcall;
TPCHIDELAYERMETHOD=Procedure (LayerNbr:Integer);stdcall;
TPCHIDEALLLAYERSMETHOD=Procedure ;stdcall;
TPCGRAYLAYERMETHOD=Procedure (LayerNbr:Integer);stdcall;
TPCEXGRAYLAYERMETHOD=Procedure (LayerNbr:Integer);stdcall;
TPCEXHIDELAYERMETHOD=Procedure (LayerNbr:Integer);stdcall;
TPCSHOWALLLAYERSMETHOD=Procedure ;stdcall;
TPCMERGEALLLAYERSMETHOD=Procedure ;stdcall;
TPCMERGEVISIBLELAYERSMETHOD=Procedure ;stdcall;
TPCGETLAYERNAMEMETHOD= Function (LayerNbr:Integer):PChar;stdcall;
TPCGETLAYERHANDLEMETHOD= Function (LayerNbr:Integer):Integer;stdcall;
TPCGETLAYERVISIBLEMETHOD= Function (LayerNbr:Integer):LongInt;stdcall;
TPCGETLAYERGRAYEDMETHOD= Function (LayerNbr:Integer):LongInt;stdcall;
TPCGETSELECTEDHANDLEMETHOD= Function (index:Integer):Integer;stdcall;
TPCFIGUREGETHANDLEMETHOD= Function (FigureIndex:Integer):Integer;stdcall;
TPCFIGUREGETNAMEMETHOD= Function (FigureHandle:Integer):PChar;stdcall;
TPCFIGUREGETCLASSMETHOD= Function (FigureHandle:Integer):PChar;stdcall;
TPCFIGUREGETPOINTCOUNTMETHOD= Function (FigureHandle:Integer):Integer;stdcall;
TPCFIGUREGETPOINTMETHOD= Function (FigureHandle:Integer;pIndex:Integer):TDoublePoint;stdcall;
TPCFIGUREGETDCPOINTMETHOD= Function (FigureHandle:Integer;pIndex:Integer):TDoublePoint;stdcall;
TPCFIGUREGETCENTERMETHOD= Function (FigureHandle:Integer):TDoublePoint;stdcall;
TPCFIGUREGETRECTMETHOD= Function (FigureHandle:Integer):TDoubleRect;stdcall;
TPCFIGUREGETRADIUSMETHOD= Function (FigureHandle:Integer):Double;stdcall;
TPCFIGUREGETFONTNAMEMETHOD= Function (FigureHandle:Integer):PChar;stdcall;
TPCFIGUREGETFONTBOLDMETHOD= Function (FigureHandle:Integer):LongInt;stdcall;
TPCFIGUREGETFONTITALICMETHOD= Function (FigureHandle:Integer):LongInt;stdcall;
TPCFIGUREGETFONTUNDERLINEMETHOD= Function (FigureHandle:Integer):LongInt;stdcall;
TPCFIGUREGETFONTSTRIKEMETHOD= Function (FigureHandle:Integer):LongInt;stdcall;
TPCFIGUREGETFONTSIZEMETHOD= Function (FigureHandle:Integer):Double;stdcall;
TPCFIGUREGETFONTCHARSETMETHOD= Function (FigureHandle:Integer):Integer;stdcall;
TPCFIGUREGETFONTCOLORMETHOD= Function (FigureHandle:Integer):Integer;stdcall;
TPCFIGUREGETPENCOLORMETHOD= Function (FigureHandle:Integer):Integer;stdcall;
TPCFIGUREGETBRUSHCOLORMETHOD= Function (FigureHandle:Integer):Integer;stdcall;
TPCFIGUREGETPENSTYLEMETHOD= Function (FigureHandle:Integer):Integer;stdcall;
TPCFIGUREGETBRUSHSTYLEMETHOD= Function (FigureHandle:Integer):Integer;stdcall;
TPCFIGUREGETROWSTYLEMETHOD= Function (FigureHandle:Integer):Integer;stdcall;
TPCFIGUREGETPENWIDTHMETHOD= Function (FigureHandle:Integer):Integer;stdcall;
TPCFIGUREGETINFOMETHOD= Function (FigureHandle:Integer):PChar;stdcall;
TPCFIGUREGETANGLEMETHOD= Function (FigureHandle:Integer):Double;stdcall;
TPCFIGUREGETLAYERHANDLEMETHOD= Function (FigureHandle:Integer):Integer;stdcall;
TPCFIGUREGETDIAGONALMETHOD= Function (FigureHandle:Integer):LongInt;stdcall;
TPCFIGUREGETLOCKMOVEMETHOD= Function (FigureHandle:Integer):LongInt;stdcall;
TPCFIGUREGETLOCKMODIFYMETHOD= Function (FigureHandle:Integer):LongInt;stdcall;
TPCFIGUREGETSELECTEDMETHOD= Function (FigureHandle:Integer):LongInt;stdcall;
TPCFIGURETESTPOINTMETHOD= Function (FigureHandle:Integer;var TestPoint:TDoublePoint):LongInt;stdcall;
TPCFIGURETESTRECTMETHOD= Function (FigureHandle:Integer;var TestRect:TDoubleRect):LongInt;stdcall;
TPCFIGUREGETRGNHANDLEMETHOD= Function (FigureHandle:Integer):Integer;stdcall;
TPCFIGURESELECTMETHOD=Procedure (FigureHandle:Integer);stdcall;
TPCFIGURESELECTASROTATEMETHOD=Procedure (FigureHandle:Integer);stdcall;
TPCFIGUREDESELECTMETHOD=Procedure (FigureHandle:Integer);stdcall;
TPCFIGUREEDITMETHOD=Procedure (FigureHandle:Integer);stdcall;
TPCFIGUREMOVEMETHOD=Procedure (FigureHandle:Integer;deltax:Double;deltay:Double);stdcall;
TPCFIGUREROTATEMETHOD=Procedure (FigureHandle:Integer;Angle:Double);stdcall;
TPCFIGUREROTATEBYPOINTMETHOD=Procedure (FigureHandle:Integer;Angle:Double;var cPoint:TDoublePoint);stdcall;
TPCFIGUREMIRRORMETHOD=Procedure (FigureHandle:Integer;var Point1:TDoublePoint;var Point2:TDoublePoint);stdcall;
TPCFIGURESCALEMETHOD=Procedure (FigureHandle:Integer;px:Double;py:Double);stdcall;
TPCFIGURESCALEBYPOINTMETHOD=Procedure (FigureHandle:Integer;px:Double;py:Double;var rPoint:TDoublePoint);stdcall;
TPCFIGURESETFONTNAMEMETHOD=Procedure (FigureHandle:Integer;value:PChar);stdcall;
TPCFIGURESETFONTBOLDMETHOD=Procedure (FigureHandle:Integer;value:LongInt);stdcall;
TPCFIGURESETFONTITALICMETHOD=Procedure (FigureHandle:Integer;value:LongInt);stdcall;
TPCFIGURESETFONTUNDERLINEMETHOD=Procedure (FigureHandle:Integer;value:LongInt);stdcall;
TPCFIGURESETFONTSTRIKEMETHOD=Procedure (FigureHandle:Integer;value:LongInt);stdcall;
TPCFIGURESETFONTSIZEMETHOD=Procedure (FigureHandle:Integer;value:Double);stdcall;
TPCFIGURESETFONTCHARSETMETHOD=Procedure (FigureHandle:Integer;value:Integer);stdcall;
TPCFIGURESETFONTCOLORMETHOD=Procedure (FigureHandle:Integer;value:Integer);stdcall;
TPCFIGURESETPENCOLORMETHOD=Procedure (FigureHandle:Integer;value:Integer);stdcall;
TPCFIGURESETBRUSHCOLORMETHOD=Procedure (FigureHandle:Integer;value:Integer);stdcall;
TPCFIGURESETPENSTYLEMETHOD=Procedure (FigureHandle:Integer;value:Integer);stdcall;
TPCFIGURESETBRUSHSTYLEMETHOD=Procedure (FigureHandle:Integer;value:Integer);stdcall;
TPCFIGURESETROWSTYLEMETHOD=Procedure (FigureHandle:Integer;value:Integer);stdcall;
TPCFIGURESETPENWIDTHMETHOD=Procedure (FigureHandle:Integer;value:Integer);stdcall;
TPCFIGURESETPOINTMETHOD=Procedure (FigureHandle:Integer;pIndex:Integer;var fPoint:TDoublePoint);stdcall;
TPCFIGURESETINFOMETHOD=Procedure (FigureHandle:Integer;value:PChar);stdcall;
TPCFIGURESETANGLEMETHOD=Procedure (FigureHandle:Integer;value:Double);stdcall;
TPCFIGURESETLAYERHANDLEMETHOD=Procedure (FigureHandle:Integer;value:Integer);stdcall;
TPCFIGURESETDIAGONALMETHOD=Procedure (FigureHandle:Integer;value:LongInt);stdcall;
TPCFIGURESETLOCKMOVEMETHOD=Procedure (FigureHandle:Integer;value:LongInt);stdcall;
TPCFIGURESETLOCKMODIFYMETHOD=Procedure (FigureHandle:Integer;value:LongInt);stdcall;
TPCFIGURESETRGNHANDLEMETHOD=Procedure (FigureHandle:Integer;Rgn:Integer);stdcall;
TPCGETDCPOINTMETHOD= Function (var p:TDoublePoint):TDoublePoint;stdcall;
TPCGETDCLENMETHOD= Function (l:Double):Integer;stdcall;
TPCFIGUREGRPGETFIGURECOUNTMETHOD= Function (FigureHandle:Integer):Integer;stdcall;
TPCFIGUREGRPGETFIGUREHANDLEMETHOD= Function (FigureHandle:Integer;fIndex:Integer):Integer;stdcall;
TPCFIGUREGRPGETCOMBINEDMETHOD= Function (FigureHandle:Integer):LongInt;stdcall;
TPCFIGUREGRPSETCOMBINEDMETHOD=Procedure (FigureHandle:Integer;Value:LongInt);stdcall;
TPCFIGUREGRPUNGROUPMETHOD=Procedure (FigureHandle:Integer);stdcall;
TPCFIGUREBLOCKGETBLOCKNAMEMETHOD= Function (FigureHandle:Integer):PChar;stdcall;
TPCFIGUREGETJOIN1METHOD= Function (FigureHandle:Integer):Integer;stdcall;
TPCFIGUREGETJOIN2METHOD= Function (FigureHandle:Integer):Integer;stdcall;
TPCFIGURESETJOIN1METHOD=Procedure (FigureHandle:Integer;JHandle:Integer);stdcall;
TPCFIGURESETJOIN2METHOD=Procedure (FigureHandle:Integer;JHandle:Integer);stdcall;
TPCFIGUREGETCLOSEDMETHOD= Function (FigureHandle:Integer):LongInt;stdcall;
TPCFIGURESETCLOSEDMETHOD=Procedure (FigureHandle:Integer;Closed:LongInt);stdcall;
TPCFIGUREGETCONTROLPOINTMETHOD= Function (FigureHandle:Integer;SegmentIndex:Integer;pIndex:Integer):TDoublePoint;stdcall;
TPCFIGURESETCONTROLPOINTSMETHOD=Procedure (FigureHandle:Integer;SegmentIndex:Integer;var cPoint1:TDoublePoint;var cPoint2:TDoublePoint);stdcall;
TPCFIGUREGETSEGMENTTYPEMETHOD= Function (FigureHandle:Integer;SegmentIndex:Integer):Integer;stdcall;
TPCFIGURESETSEGMENTTYPEMETHOD=Procedure (FigureHandle:Integer;SegmentIndex:Integer;SegType:Integer);stdcall;
TPCFIGUREINVERTARCSEGMENTMETHOD=Procedure (FigureHandle:Integer;SegmentIndex:Integer);stdcall;
TPCFIGURECONVERTPLBEZIERMETHOD=Procedure (FigureHandle:Integer);stdcall;
TPCFIGURECONVERTPLPOLYLINEMETHOD=Procedure (FigureHandle:Integer);stdcall;
TPCFIGUREGETELPALENMETHOD= Function (FigureHandle:Integer):Double;stdcall;
TPCFIGUREGETELPBLENMETHOD= Function (FigureHandle:Integer):Double;stdcall;
TPCFIGUREGETARCSTYLEMETHOD= Function (FigureHandle:Integer):Integer;stdcall;
TPCFIGURESETARCSTYLEMETHOD=Procedure (FigureHandle:Integer;aStyle:Integer);stdcall;
TPCFIGUREINVERTARCMETHOD=Procedure (FigureHandle:Integer);stdcall;
TPCFIGUREGETARCSANGLEMETHOD= Function (FigureHandle:Integer):Double;stdcall;
TPCFIGUREGETARCFANGLEMETHOD= Function (FigureHandle:Integer):Double;stdcall;
TPCFIGURESETARCANGLESMETHOD=Procedure (FigureHandle:Integer;SAngle:Double;FAngle:Double);stdcall;
TPCFIGUREGETRICHTEXTMETHOD= Function (FigureHandle:Integer):PChar;stdcall;
TPCFIGURESETRICHTEXTMETHOD=Procedure (FigureHandle:Integer;rText:PChar);stdcall;
TPCFIGUREGETPICTURENAMEMETHOD= Function (FigureHandle:Integer):PChar;stdcall;
TPCFIGUREGETTRANSPARENTMETHOD= Function (FigureHandle:Integer):LongInt;stdcall;
TPCFIGURESETTRANSPARENTMETHOD=Procedure (FigureHandle:Integer;Value:LongInt);stdcall;
TPCFIGUREFLIPHORZMETHOD=Procedure (FigureHandle:Integer);stdcall;
TPCFIGUREFLIPVERTMETHOD=Procedure (FigureHandle:Integer);stdcall;
TPCFIGURESKEWBITMAPMETHOD=Procedure (FigureHandle:Integer);stdcall;
TPCFIGURESAVEBITMAPTOFILEMETHOD=Procedure (FigureHandle:Integer;Fname:PChar);stdcall;
TPCFIGURELOADBITMAPFROMFILEMETHOD=Procedure (FigureHandle:Integer;Fname:PChar);stdcall;
TPCFIGUREGETTEXTMETHOD= Function (FigureHandle:Integer):PChar;stdcall;
TPCFIGURESETTEXTMETHOD=Procedure (FigureHandle:Integer;Value:PChar);stdcall;
TPCDRAWUSERFIGUREEVENTMETHOD= Function (Cname:PChar;DC:Integer;Handle:Integer;isGrayed:LongInt):LongInt;stdcall;
TPCPOINTINUSERFIGUREEVENTMETHOD= Function (Cname:PChar;Handle:Integer;x:Double;y:Double;var Test:LongInt):LongInt;stdcall;
TPCDRAWMETHOD=Procedure ;stdcall;
TPCDRAWFIGURESMETHOD=Procedure ;stdcall;
TPCDRAWSELECTEDFIGURESMETHOD=Procedure ;stdcall;
TPCDRAWSELECTIONPOINTSMETHOD=Procedure ;stdcall;
TPCDRAWFIGUREGUIDESMETHOD=Procedure ;stdcall;
TPCSELECTALLMETHOD=Procedure (LayerNbr:Integer);stdcall;
TPCDESELECTALLMETHOD=Procedure (LayerNbr:Integer);stdcall;
TPCINVERTSELECTIONMETHOD=Procedure ;stdcall;
TPCGROUPSELECTIONMETHOD= Function :Integer;stdcall;
TPCUNGROUPSELECTIONMETHOD=Procedure ;stdcall;
TPCORDERSELECTIONMETHOD=Procedure (Dest:Integer);stdcall;
TPCREMOVESELECTIONMETHOD=Procedure ;stdcall;
TPCROTATESELECTIONCENTERMETHOD=Procedure (Angle:Double);stdcall;
TPCROTATESELECTIONMETHOD=Procedure (Angle:Double;var rPoint:TDoublePoint);stdcall;
TPCMIRRORSELECTIONMETHOD=Procedure (var Point1:TDoublePoint;var Point2:TDoublePoint;Dupl:LongInt);stdcall;
TPCKNIFESELECTIONMETHOD=Procedure (var Point1:TDoublePoint;var Point2:TDoublePoint);stdcall;
TPCCREATEDIMLINESOFSELECTIONMETHOD=Procedure ;stdcall;
TPCCLEARDIMLINESOFSELECTIONMETHOD=Procedure ;stdcall;
TPCINTERBREAKSELECTIONMETHOD=Procedure ;stdcall;
TPCLOCKSELECTIONTOMOVEMETHOD=Procedure (Locked:LongInt);stdcall;
TPCLOCKSELECTIONTOMODIFYMETHOD=Procedure (Locked:LongInt);stdcall;
TPCINVERTARCSOFSELECTIONMETHOD=Procedure ;stdcall;
TPCARRANGEARCSTYLEOFSELECTIONMETHOD=Procedure (Value:Integer);stdcall;
TPCCLOSESELECTEDPOLYLINEMETHOD=Procedure ;stdcall;
TPCOPENSELECTEDPOLYLINEMETHOD=Procedure ;stdcall;
TPCSIMPLFYSELECTEDPOLYLINEMETHOD=Procedure ;stdcall;
TPCNAMESELECTIONMETHOD=Procedure ;stdcall;
TPCCONVERTPLTOBEZIERMETHOD=Procedure ;stdcall;
TPCCONVERTPLTOPOLYLINEMETHOD=Procedure ;stdcall;
TPCFLIPIMAGESOFSELECTIONMETHOD=Procedure (FlipMode:Integer);stdcall;
TPCSETTRANSPARENTOFSELECTIONMETHOD=Procedure (Transparent:LongInt);stdcall;
TPCSCALESELECTIONMETHOD=Procedure (percentX:Double;percentY:Double;var rPoint:TDoublePoint);stdcall;
TPCSCALEDRAWINGMETHOD=Procedure (percentx:Double;percenty:Double);stdcall;
TPCMODIFYFONTNAMEMETHOD=Procedure (value:PChar);stdcall;
TPCMODIFYFONTBOLDMETHOD=Procedure (value:LongInt);stdcall;
TPCMODIFYFONTITALICMETHOD=Procedure (value:LongInt);stdcall;
TPCMODIFYFONTUNDERLINEMETHOD=Procedure (value:LongInt);stdcall;
TPCMODIFYFONTSTRIKEMETHOD=Procedure (value:LongInt);stdcall;
TPCMODIFYFONTSIZEMETHOD=Procedure (value:Double);stdcall;
TPCMODIFYFONTCHARSETMETHOD=Procedure (value:Integer);stdcall;
TPCMODIFYFONTCOLORMETHOD=Procedure (value:Integer);stdcall;
TPCMODIFYPENCOLORMETHOD=Procedure (value:Integer);stdcall;
TPCMODIFYBRUSHCOLORMETHOD=Procedure (value:Integer);stdcall;
TPCMODIFYPENSTYLEMETHOD=Procedure (value:Integer);stdcall;
TPCMODIFYBRUSHSTYLEMETHOD=Procedure (value:Integer);stdcall;
TPCMODIFYROWSTYLEMETHOD=Procedure (value:Integer);stdcall;
TPCMODIFYPENWIDTHMETHOD=Procedure (value:Integer);stdcall;
TPCISTEXTSELECTEDMETHOD= Function :LongInt;stdcall;
TPCGETSELECTIONBOUNDSMETHOD=Procedure (var MaxX:Double;var MaxY:Double;var MinX:Double;var MinY:Double);stdcall;
TPCGETDRAWINGBOUNDSMETHOD=Procedure (var MaxX:Double;var MaxY:Double;var MinX:Double;var MinY:Double);stdcall;
TPCREDRAWSELECTIONMETHOD=Procedure ;stdcall;
TPCREDRAWSELECTIONPOINTSMETHOD=Procedure ;stdcall;
TPCMANUALREFRESHMETHOD=Procedure ;stdcall;
TPCREFRESHSELECTIONMETHOD=Procedure ;stdcall;
TPCRESELECTMETHOD=Procedure ;stdcall;
TPCGETSURFACEBITMAPHANDLEMETHOD= Function :Integer;stdcall;
TPCSELECTBYPOINTMETHOD= Function (LayerNbr:Integer;x:Double;y:Double;shiftpressed:LongInt):LongInt;stdcall;
TPCDOMAGICWANDMETHOD= Function (LayerNbr:Integer;x:Double;y:Double):Integer;stdcall;
TPCSELECTBYFIGUREMETHOD= Function (LayerNbr:Integer;Fig:Integer;shiftpressed:LongInt):LongInt;stdcall;
TPCSELECTWITHINAREAMETHOD= Function (LayerNbr:Integer;var area:TDoubleRect;shiftpressed:LongInt):LongInt;stdcall;
TPCSELECTFIGUREMETHOD=Procedure (FHandle:Integer);stdcall;
TPCDESELECTFIGUREMETHOD=Procedure (FHandle:Integer);stdcall;
TPCMOVESELECTIONMETHOD=Procedure (deltax:Double;deltay:Double);stdcall;
TPCMOVEALLMETHOD=Procedure (deltax:Double;deltay:Double);stdcall;
TPCMOVEALLSILENTMETHOD=Procedure (deltax:Double;deltay:Double);stdcall;
TPCDUPLICATESELECTIONMETHOD=Procedure (deltax:Double;deltay:Double);stdcall;
TPCDUPLICATESELECTIONASBEZIERMETHOD=Procedure (deltax:Double;deltay:Double);stdcall;
TPCCONVERTSELECTIONTOBEZIERMETHOD=Procedure ;stdcall;
TPCARRAYRECTSELECTIONMETHOD=Procedure (distanceX:Double;distanceY:Double;col:Integer;row:Integer);stdcall;
TPCARRAYPOLARSELECTIONMETHOD=Procedure (var cpoint:TDoublePoint;angle:Double);stdcall;
TPCMAKESELECTIONBLOCKMETHOD=Procedure (FileName:PChar);stdcall;
TPCBOUNDSELECTEDLINEMETHOD=Procedure ;stdcall;
TPCBOUNDLINETOFIGURESMETHOD=Procedure (BLine:Integer;jf1:Integer;jf2:Integer);stdcall;
TPCBOUNDLINEPOINTMETHOD=Procedure (BLine:Integer;seqnbr:Integer;var bPoint:TDoublePoint);stdcall;
TPCUNBOUNDLINEMETHOD=Procedure ;stdcall;
TPCMAKESELECTEDLINESPOLYLINEMETHOD= Function :Integer;stdcall;
TPCWELDINTOPOLYLINEMETHOD= Function :Integer;stdcall;
TPCOFFSETSELECTIONMETHOD=Procedure (Thick:Double);stdcall;
TPCCLIPSELBITMAPTOSELFIGUREMETHOD=Procedure ;stdcall;
TPCUNCLIPSELBITMAPMETHOD=Procedure ;stdcall;
TPCSAVETOFILEMETHOD=Procedure (LayerNbr:Integer;FileName:PChar);stdcall;
TPCLOADFROMFILEMETHOD=Procedure (FileName:PChar);stdcall;
TPCINSERTBLOCKWITHFILENAMEMETHOD= Function (LayerNbr:Integer;FileName:PChar;x:Double;y:Double):Integer;stdcall;
TPCSETBLOCKINFOMETHOD=Procedure (FigHandle:Integer;Info:PChar);stdcall;
TPCEXPORTASWMFMETHOD=Procedure (FileName:PChar);stdcall;
TPCEXPORTASDXFMETHOD=Procedure (FileName:PChar);stdcall;
TPCSELECTIONASMETAFILEMETHOD= Function :Integer;stdcall;
TPCDRAWINGASMETAFILEMETHOD= Function :Integer;stdcall;
TPCFIGUREASMETAFILEMETHOD= Function (FigHandle:Integer):Integer;stdcall;
TPCSELECTIONASBMPHANDLEMETHOD= Function (dpi:Integer):Integer;stdcall;
TPCSAVEASBITMAPMETHOD=Procedure (FileName:PChar);stdcall;
TPCCREATEPREVIEWBITMAPHANDLEMETHOD= Function :Integer;stdcall;
TPCDRAWTODCMETHOD=Procedure (dc:Integer;x:Integer;y:Integer;DScale:Double);stdcall;
TPCSTRETCHTODCMETHOD=Procedure (dc:Integer;aLeft:Integer;aTop:Integer;aRight:Integer;aBottom:Integer);stdcall;
TPCPRINTDRAWINGMETHOD=Procedure (TitleinStatusBox:PChar);stdcall;
TPCPRINTDRAWINGASWMFMETHOD=Procedure (TitleinStatusBox:PChar);stdcall;
TPCPRNSTARTJOBMETHOD=Procedure (TitleinStatusBox:PChar);stdcall;
TPCPRNDOJOBMETHOD=Procedure (NewPage:LongInt);stdcall;
TPCPRNENDJOBMETHOD=Procedure ;stdcall;
TPCPRNABORTJOBMETHOD=Procedure ;stdcall;
TPCPRINTBYTILINGMETHOD=Procedure (TitleinStatusBox:PChar;prWmm:Double;prHmm:Double);stdcall;
TPCIMPORTDXFMETHOD=Procedure (fileName:PChar;Layered:LongInt;IncVertex:LongInt);stdcall;
TPCCLEARMETHOD=Procedure (LayerNbr:Integer);stdcall;
TPCCOPYTOCLIPBOARDMETHOD=Procedure ;stdcall;
TPCCUTTOCLIPBOARDMETHOD=Procedure ;stdcall;
TPCSETFIELDTEXTMETHOD=Procedure (FName:PChar;FValue:PChar);stdcall;
TPCPASTEFROMCLIPBOARDMETHOD=Procedure (LayerNbr:Integer);stdcall;
TPCGETLAYERNBRMETHOD= Function (LayerName:PChar):Integer;stdcall;
TPCFINDFIGUREBYNAMEMETHOD= Function (FigName:PChar):Integer;stdcall;
TPCLINEMETHOD= Function (LayerNbr:Integer;x1:Double;y1:Double;x2:Double;y2:Double;w:Integer;s:Integer;c:Integer;row:Integer;selected:LongInt):Integer;stdcall;
TPCVERTEXMETHOD= Function (LayerNbr:Integer;x:Double;y:Double;selected:LongInt):Integer;stdcall;
TPCPOLYLINEMETHOD= Function (LayerNbr:Integer;var points:TDoublePoint;pCount:Integer;w:Integer;s:Integer;c:Integer;row:Integer;brs:Integer;brc:Integer;closed:LongInt;selected:LongInt):Integer;stdcall;
TPCELLIPSEMETHOD= Function (LayerNbr:Integer;cx:Double;cy:Double;lenax:Double;lenbx:Double;angle:Double;w:Integer;s:Integer;c:Integer;brs:Integer;brc:Integer;selected:LongInt):Integer;stdcall;
TPCDRAWCIRCLEMETHOD= Function (LayerNbr:Integer;cx:Double;cy:Double;radius:Double;w:Integer;s:Integer;c:Integer;brs:Integer;brc:Integer;selected:LongInt):Integer;stdcall;
TPCARCMETHOD= Function (LayerNbr:Integer;cx:Double;cy:Double;radius:Double;a1:Double;a2:Double;w:Integer;s:Integer;c:Integer;brs:Integer;brc:Integer;ArcStyle:Integer;selected:LongInt):Integer;stdcall;
TPCELPARCMETHOD= Function (LayerNbr:Integer;cx:Double;cy:Double;lenax:Double;lenbx:Double;angle:Double;a1:Double;a2:Double;w:Integer;s:Integer;c:Integer;brs:Integer;brc:Integer;ArcStyle:Integer;selected:LongInt):Integer;stdcall;
TPCRECTANGLEMETHOD= Function (LayerNbr:Integer;x1:Double;y1:Double;x2:Double;y2:Double;w:Integer;s:Integer;c:Integer;brs:Integer;brc:Integer;selected:LongInt):Integer;stdcall;
TPCINSERTBITMAPMETHOD= Function (LayerNbr:Integer;x:Double;y:Double;fName:PChar;transparent:LongInt;selected:LongInt):Integer;stdcall;
TPCINSERTBITMAPHANDLEMETHOD= Function (LayerNbr:Integer;x:Double;y:Double;xBitmap:Integer;transparent:LongInt;selected:LongInt):Integer;stdcall;
TPCINSERTWMFMETHOD= Function (LayerNbr:Integer;x:Double;y:Double;fName:PChar;selected:LongInt):Integer;stdcall;
TPCIMPORTWMFMETHOD= Function (LayerNbr:Integer;fName:PChar;selected:LongInt):Integer;stdcall;
TPCIMPORTDRAWINGMETHOD= Function (LayerNbr:Integer;x:Double;y:Double;fName:PChar;Selected:LongInt):Integer;stdcall;
TPCTEXTOUTMETHOD= Function (LayerNbr:Integer;x1:Double;y1:Double;angle:Double;height:Double;ratio:Double;atext:PChar;aFontName:PChar;FontCharset:Byte;Color:Integer;Selected:LongInt):Integer;stdcall;
TPCGETFIGURECUSTOMSTREAMMETHOD= Function (f:Integer;var size:Integer):Integer;stdcall;
TPCSETFIGURECUSTOMSTREAMMETHOD=Procedure (f:Integer;size:Integer;var data:Byte);stdcall;
TPCGETCUSTOMSTREAMMETHOD= Function (var size:Integer):Integer;stdcall;
TPCSETCUSTOMSTREAMMETHOD=Procedure (size:Integer;var data:Byte);stdcall;
TPCPRINTPREVIEWMETHOD=Procedure ;stdcall;
TPCGETSLCPENSTYLEMETHOD= Function :Integer;stdcall;
TPCGETSLCPENWIDTHMETHOD= Function :Integer;stdcall;
TPCGETSLCPENCOLORMETHOD= Function :Integer;stdcall;
TPCGETSLCROWSTYLEMETHOD= Function :Integer;stdcall;
TPCGETSLCBRUSHSTYLEMETHOD= Function :Integer;stdcall;
TPCGETSLCBRUSHCOLORMETHOD= Function :Integer;stdcall;
TPCGETSLCFONTNAMEMETHOD= Function :PChar;stdcall;
TPCGETSLCFONTBOLDMETHOD= Function :LongInt;stdcall;
TPCGETSLCFONTITALICMETHOD= Function :LongInt;stdcall;
TPCGETSLCFONTSTRIKEMETHOD= Function :LongInt;stdcall;
TPCGETSLCFONTSIZEMETHOD= Function :Double;stdcall;
TPCGETSLCFONTCOLORMETHOD= Function :Integer;stdcall;
TPCGETSLCPOLYLINECLOSEDMETHOD= Function :LongInt;stdcall;
TPCGETSLCIMAGETRANSPARENTMETHOD= Function :LongInt;stdcall;
TPCGETSLCIMAGECLIPPEDMETHOD= Function :LongInt;stdcall;
TPCGETSLCARCSTYLEMETHOD= Function :Integer;stdcall;
TPCGETSLCLINEBOUNDEDMETHOD= Function :LongInt;stdcall;
TPCCOUNTBLOCKMETHOD= Function (BlockName:PChar):Integer;stdcall;
TPCEXECUTETBCOMMANDMETHOD=Procedure (CommandId:Integer);stdcall;
TPCGETVERSIONMETHOD= Function :Integer;stdcall;
TPCGETBUILDNUMBERMETHOD= Function :Integer;stdcall;
TPCBLOCKASMETAFILEMETHOD= Function (bPath:PChar):Integer;stdcall;
TPCLOCKSELCHANGEMETHOD=Procedure ;stdcall;
TPCUNLOCKSELCHANGEMETHOD=Procedure ;stdcall;
TPCCENTERPAGEMETHOD=Procedure ;stdcall;
TPCALIGNPAGEDOWNMETHOD=Procedure ;stdcall;
TPCALIGNPAGEUPMETHOD=Procedure ;stdcall;
TPCSTARTBLINKMETHOD=Procedure ;stdcall;
TPCSTOPBLINKMETHOD=Procedure ;stdcall;
TPCRESUMEBLINKMETHOD=Procedure ;stdcall;
TPCISBLINKINGMETHOD= Function :LongInt;stdcall;
TPCCALIBRATELAYERSCALEMETHOD=Procedure (var p1:TDoublePoint;var p2:TDoublePoint;cUnit:Byte);stdcall;
TPCCNEWDRAWINGMETHOD= Function :LongInt;stdcall;
TPCCOPENDRAWINGMETHOD=Procedure ;stdcall;
TPCCOPENDRAWINGFILEMETHOD=Procedure (fName:PChar);stdcall;
TPCCSAVEDRAWINGMETHOD=Procedure ;stdcall;
TPCCSAVEASDRAWINGMETHOD=Procedure ;stdcall;
TPCCPRINTDRAWINGMETHOD=Procedure ;stdcall;
TPCCPRINTDRAWINGASWMFMETHOD=Procedure ;stdcall;
TPCCTESTPRINTERMETHOD=Procedure ;stdcall;
TPCCEXPORTASMETHOD=Procedure ;stdcall;
TPCCIMPORTDXFMETHOD=Procedure ;stdcall;
TPCDOPOPUPMETHOD=Procedure (x:Double;y:Double);stdcall;
TPCEXECUTECUSTOMCOMMANDMETHOD=Procedure (commandName:PChar);stdcall;
TPCEXECUTEVERBALCOMMANDMETHOD=Procedure (Command:PChar);stdcall;
TPCEXITAPPLICATIONMETHOD= Function :LongInt;stdcall;
TPCISUNNAMEDMETHOD= Function :LongInt;stdcall;



Procedure GetAdresses(OwnerApp:Integer);

var
pcGetPropDotsPerMil:TPCGETPROPDOTSPERMIL;
pcGetPropLocked:TPCGETPROPLOCKED;
pcSetPropLocked:TPCSETPROPLOCKED;
pcGetPropUpdated:TPCGETPROPUPDATED;
pcSetPropUpdated:TPCSETPROPUPDATED;
pcGetPropAutoRefresh:TPCGETPROPAUTOREFRESH;
pcSetPropAutoRefresh:TPCSETPROPAUTOREFRESH;
pcGetPropRulerVisible:TPCGETPROPRULERVISIBLE;
pcSetPropRulerVisible:TPCSETPROPRULERVISIBLE;
pcGetPropVerticalZero:TPCGETPROPVERTICALZERO;
pcSetPropVerticalZero:TPCSETPROPVERTICALZERO;
pcGetPropHorizontalZero:TPCGETPROPHORIZONTALZERO;
pcSetPropHorizontalZero:TPCSETPROPHORIZONTALZERO;
pcGetPropToolIdx:TPCGETPROPTOOLIDX;
pcGetPropToolInfo:TPCGETPROPTOOLINFO;
pcGetPropToolData:TPCGETPROPTOOLDATA;
pcGetPropDotsPerMilOrig:TPCGETPROPDOTSPERMILORIG;
pcSetPropDotsPerMilOrig:TPCSETPROPDOTSPERMILORIG;
pcGetPropActiveLayer:TPCGETPROPACTIVELAYER;
pcSetPropActiveLayer:TPCSETPROPACTIVELAYER;
pcGetPropZoomScale:TPCGETPROPZOOMSCALE;
pcSetPropZoomScale:TPCSETPROPZOOMSCALE;
pcGetPropGuidesVisible:TPCGETPROPGUIDESVISIBLE;
pcSetPropGuidesVisible:TPCSETPROPGUIDESVISIBLE;
pcGetPropBackGround:TPCGETPROPBACKGROUND;
pcSetPropBackGround:TPCSETPROPBACKGROUND;
pcGetPropPageColor:TPCGETPROPPAGECOLOR;
pcSetPropPageColor:TPCSETPROPPAGECOLOR;
pcGetPropGrids:TPCGETPROPGRIDS;
pcSetPropGrids:TPCSETPROPGRIDS;
pcGetPropGridType:TPCGETPROPGRIDTYPE;
pcSetPropGridType:TPCSETPROPGRIDTYPE;
pcGetPropCenterGuide:TPCGETPROPCENTERGUIDE;
pcSetPropCenterGuide:TPCSETPROPCENTERGUIDE;
pcGetPropPageGuide:TPCGETPROPPAGEGUIDE;
pcSetPropPageGuide:TPCSETPROPPAGEGUIDE;
pcGetPropDrawShadow:TPCGETPROPDRAWSHADOW;
pcSetPropDrawShadow:TPCSETPROPDRAWSHADOW;
pcGetPropDrawPageBorder:TPCGETPROPDRAWPAGEBORDER;
pcSetPropDrawPageBorder:TPCSETPROPDRAWPAGEBORDER;
pcGetPropGridColor:TPCGETPROPGRIDCOLOR;
pcSetPropGridColor:TPCSETPROPGRIDCOLOR;
pcGetPropGuideColor:TPCGETPROPGUIDECOLOR;
pcSetPropGuideColor:TPCSETPROPGUIDECOLOR;
pcGetPropRulerColor:TPCGETPROPRULERCOLOR;
pcSetPropRulerColor:TPCSETPROPRULERCOLOR;
pcGetPropGridStep:TPCGETPROPGRIDSTEP;
pcSetPropGridStep:TPCSETPROPGRIDSTEP;
pcGetPropWorkHeight:TPCGETPROPWORKHEIGHT;
pcSetPropWorkHeight:TPCSETPROPWORKHEIGHT;
pcGetPropWorkWidth:TPCGETPROPWORKWIDTH;
pcSetPropWorkWidth:TPCSETPROPWORKWIDTH;
pcGetPropPageLayout:TPCGETPROPPAGELAYOUT;
pcSetPropPageLayout:TPCSETPROPPAGELAYOUT;
pcGetPropPageOrient:TPCGETPROPPAGEORIENT;
pcSetPropPageOrient:TPCSETPROPPAGEORIENT;
pcGetPropGuideTrace:TPCGETPROPGUIDETRACE;
pcSetPropGuideTrace:TPCSETPROPGUIDETRACE;
pcGetPropSnapToGuides:TPCGETPROPSNAPTOGUIDES;
pcSetPropSnapToGuides:TPCSETPROPSNAPTOGUIDES;
pcGetPropSnapToNearPoint:TPCGETPROPSNAPTONEARPOINT;
pcSetPropSnapToNearPoint:TPCSETPROPSNAPTONEARPOINT;
pcGetPropSnapToGrids:TPCGETPROPSNAPTOGRIDS;
pcSetPropSnapToGrids:TPCSETPROPSNAPTOGRIDS;
pcGetPropScrollBars:TPCGETPROPSCROLLBARS;
pcSetPropScrollBars:TPCSETPROPSCROLLBARS;
pcGetPropRulerSystem:TPCGETPROPRULERSYSTEM;
pcSetPropRulerSystem:TPCSETPROPRULERSYSTEM;
pcGetPropDrawInCursor:TPCGETPROPDRAWINCURSOR;
pcSetPropDrawInCursor:TPCSETPROPDRAWINCURSOR;
pcGetPropRealScale:TPCGETPROPREALSCALE;
pcSetPropRealScale:TPCSETPROPREALSCALE;
pcGetPropMetricMode:TPCGETPROPMETRICMODE;
pcSetPropMetricMode:TPCSETPROPMETRICMODE;
pcGetPropAngularMode:TPCGETPROPANGULARMODE;
pcSetPropAngularMode:TPCSETPROPANGULARMODE;
pcGetPropWmfPrinting:TPCGETPROPWMFPRINTING;
pcSetPropWmfPrinting:TPCSETPROPWMFPRINTING;
pcGetPropDefaultPenColor:TPCGETPROPDEFAULTPENCOLOR;
pcSetPropDefaultPenColor:TPCSETPROPDEFAULTPENCOLOR;
pcGetPropDefaultBrushColor:TPCGETPROPDEFAULTBRUSHCOLOR;
pcSetPropDefaultBrushColor:TPCSETPROPDEFAULTBRUSHCOLOR;
pcGetPropDefaultPenWidth:TPCGETPROPDEFAULTPENWIDTH;
pcSetPropDefaultPenWidth:TPCSETPROPDEFAULTPENWIDTH;
pcGetPropDefaultPenStyle:TPCGETPROPDEFAULTPENSTYLE;
pcSetPropDefaultPenStyle:TPCSETPROPDEFAULTPENSTYLE;
pcGetPropDefaultBrushStyle:TPCGETPROPDEFAULTBRUSHSTYLE;
pcSetPropDefaultBrushStyle:TPCSETPROPDEFAULTBRUSHSTYLE;
pcGetPropDefaultRowStyle:TPCGETPROPDEFAULTROWSTYLE;
pcSetPropDefaultRowStyle:TPCSETPROPDEFAULTROWSTYLE;
pcGetPropDefaultTextHeight:TPCGETPROPDEFAULTTEXTHEIGHT;
pcSetPropDefaultTextHeight:TPCSETPROPDEFAULTTEXTHEIGHT;
pcGetPropDefaultTextRatio:TPCGETPROPDEFAULTTEXTRATIO;
pcSetPropDefaultTextRatio:TPCSETPROPDEFAULTTEXTRATIO;
pcGetPropDefaultPLineClosed:TPCGETPROPDEFAULTPLINECLOSED;
pcSetPropDefaultPLineClosed:TPCSETPROPDEFAULTPLINECLOSED;
pcGetPropDefaultArcStyle:TPCGETPROPDEFAULTARCSTYLE;
pcSetPropDefaultArcStyle:TPCSETPROPDEFAULTARCSTYLE;
pcGetPropLayerCount:TPCGETPROPLAYERCOUNT;
pcGetPropFigureCount:TPCGETPROPFIGURECOUNT;
pcGetPropSelectedCount:TPCGETPROPSELECTEDCOUNT;
pcGetPropMapScale:TPCGETPROPMAPSCALE;
pcSetPropMapScale:TPCSETPROPMAPSCALE;
pcGetPropRescaleToMap:TPCGETPROPRESCALETOMAP;
pcSetPropRescaleToMap:TPCSETPROPRESCALETOMAP;
pcGetPropAutoSelect:TPCGETPROPAUTOSELECT;
pcSetPropAutoSelect:TPCSETPROPAUTOSELECT;
pcGetPropKeyCommands:TPCGETPROPKEYCOMMANDS;
pcSetPropKeyCommands:TPCSETPROPKEYCOMMANDS;
pcGetPropRecordUndo:TPCGETPROPRECORDUNDO;
pcSetPropRecordUndo:TPCSETPROPRECORDUNDO;
pcGetPropUndoCount:TPCGETPROPUNDOCOUNT;
pcSetPropUndoCount:TPCSETPROPUNDOCOUNT;
pcGetPropDefaultPictureFolder:TPCGETPROPDEFAULTPICTUREFOLDER;
pcSetPropDefaultPictureFolder:TPCSETPROPDEFAULTPICTUREFOLDER;
pcGetPropSaveWithPreview:TPCGETPROPSAVEWITHPREVIEW;
pcSetPropSaveWithPreview:TPCSETPROPSAVEWITHPREVIEW;
pcGetPropRulerMode:TPCGETPROPRULERMODE;
pcSetPropRulerMode:TPCSETPROPRULERMODE;
pcGetPropZoomRect:TPCGETPROPZOOMRECT;
pcSetPropZoomRect:TPCSETPROPZOOMRECT;
pcGetPropRangeCheck:TPCGETPROPRANGECHECK;
pcSetPropRangeCheck:TPCSETPROPRANGECHECK;
pcGetPropAutoTilePrint:TPCGETPROPAUTOTILEPRINT;
pcSetPropAutoTilePrint:TPCSETPROPAUTOTILEPRINT;
pcGetPropFigureGuides:TPCGETPROPFIGUREGUIDES;
pcSetPropFigureGuides:TPCSETPROPFIGUREGUIDES;
pcGetPropNativeFill:TPCGETPROPNATIVEFILL;
pcSetPropNativeFill:TPCSETPROPNATIVEFILL;
pcGetPropActiveFile:TPCGETPROPACTIVEFILE;
pcSetPropActiveFile:TPCSETPROPACTIVEFILE;
pcGetPropCurrentColor:TPCGETPROPCURRENTCOLOR;
pcSetPropCurrentColor:TPCSETPROPCURRENTCOLOR;
pcGetPropCurrentStyle:TPCGETPROPCURRENTSTYLE;
pcSetPropCurrentStyle:TPCSETPROPCURRENTSTYLE;
pcGetPropCurrentString:TPCGETPROPCURRENTSTRING;
pcSetPropCurrentString:TPCSETPROPCURRENTSTRING;
pcGetPropCurrentFlag:TPCGETPROPCURRENTFLAG;
pcSetPropCurrentFlag:TPCSETPROPCURRENTFLAG;
pcGetPropCurrentFileName:TPCGETPROPCURRENTFILENAME;
pcSetPropCurrentFileName:TPCSETPROPCURRENTFILENAME;
pcGetPropCurrentValue:TPCGETPROPCURRENTVALUE;
pcSetPropCurrentValue:TPCSETPROPCURRENTVALUE;
pcGetPropFileExtension:TPCGETPROPFILEEXTENSION;
pcSetPropFileExtension:TPCSETPROPFILEEXTENSION;
pcGetPropMultiSelect:TPCGETPROPMULTISELECT;
pcSetPropMultiSelect:TPCSETPROPMULTISELECT;
pcGetPropOpenDialogTitle:TPCGETPROPOPENDIALOGTITLE;
pcSetPropOpenDialogTitle:TPCSETPROPOPENDIALOGTITLE;
pcGetPropOpenDialogFilter:TPCGETPROPOPENDIALOGFILTER;
pcSetPropOpenDialogFilter:TPCSETPROPOPENDIALOGFILTER;
pcGetPropSaveDialogTitle:TPCGETPROPSAVEDIALOGTITLE;
pcSetPropSaveDialogTitle:TPCSETPROPSAVEDIALOGTITLE;
pcGetPropSaveDialogFilter:TPCGETPROPSAVEDIALOGFILTER;
pcSetPropSaveDialogFilter:TPCSETPROPSAVEDIALOGFILTER;
pcGetPropAcceptFiles:TPCGETPROPACCEPTFILES;
pcSetPropAcceptFiles:TPCSETPROPACCEPTFILES;
pcGetPropMouseCommands:TPCGETPROPMOUSECOMMANDS;
pcSetPropMouseCommands:TPCSETPROPMOUSECOMMANDS;
pcGetPropPopStyle:TPCGETPROPPOPSTYLE;
pcSetPropPopStyle:TPCSETPROPPOPSTYLE;
pcGetPropCustomPopItems:TPCGETPROPCUSTOMPOPITEMS;
pcSetPropCustomPopItems:TPCSETPROPCUSTOMPOPITEMS;
pcGetPropMirrorStraight:TPCGETPROPMIRRORSTRAIGHT;
pcSetPropMirrorStraight:TPCSETPROPMIRRORSTRAIGHT;
pcGetPropDrawingPop:TPCGETPROPDRAWINGPOP;
pcSetPropDrawingPop:TPCSETPROPDRAWINGPOP;
pcPrintMessage: TPCPRINTMESSAGEMETHOD;
pcRefresh: TPCREFRESHMETHOD;
pcClientToScreen: TPCCLIENTTOSCREENMETHOD;
pcScreenToClient: TPCSCREENTOCLIENTMETHOD;
pcSetCustomSurface: TPCSETCUSTOMSURFACEMETHOD;
pcDoResize: TPCDORESIZEMETHOD;
pcSaveScroll: TPCSAVESCROLLMETHOD;
pcRestoreScroll: TPCRESTORESCROLLMETHOD;
pcReLocate: TPCRELOCATEMETHOD;
pcDoSurfaceMove: TPCDOSURFACEMOVEMETHOD;
pcDoSurfaceClick: TPCDOSURFACECLICKMETHOD;
pcDoSurfaceDblClick: TPCDOSURFACEDBLCLICKMETHOD;
pcDoSurfaceLeave: TPCDOSURFACELEAVEMETHOD;
pcDoSurfaceDragDrop: TPCDOSURFACEDRAGDROPMETHOD;
pcDoSurfacePull: TPCDOSURFACEPULLMETHOD;
pcDoSurfacePush: TPCDOSURFACEPUSHMETHOD;
pcDoSurfaceWheel: TPCDOSURFACEWHEELMETHOD;
pcDoKeyStroke: TPCDOKEYSTROKEMETHOD;
pcCheckForGuideDrop: TPCCHECKFORGUIDEDROPMETHOD;
pcDragStarted: TPCDRAGSTARTEDMETHOD;
pcGetSelectionRect: TPCGETSELECTIONRECTMETHOD;
pcGetDrawingRect: TPCGETDRAWINGRECTMETHOD;
pcGetVisibleRect: TPCGETVISIBLERECTMETHOD;
pcDeConvertXY: TPCDECONVERTXYMETHOD;
pcDeConvertDim: TPCDECONVERTDIMMETHOD;
pcConvertXY: TPCCONVERTXYMETHOD;
pcConvertDim: TPCCONVERTDIMMETHOD;
pcZoomArea: TPCZOOMAREAMETHOD;
pcFitToWindow: TPCFITTOWINDOWMETHOD;
pcActualSize: TPCACTUALSIZEMETHOD;
pcZoomOut: TPCZOOMOUTMETHOD;
pcZoomIn: TPCZOOMINMETHOD;
pcClearGuides: TPCCLEARGUIDESMETHOD;
pcSetTool: TPCSETTOOLMETHOD;
pcSetCursor: TPCSETCURSORMETHOD;
pcSetDragCursor: TPCSETDRAGCURSORMETHOD;
pcCheckGuideLine: TPCCHECKGUIDELINEMETHOD;
pcBeginHRulerDrag: TPCBEGINHRULERDRAGMETHOD;
pcBeginVRulerDrag: TPCBEGINVRULERDRAGMETHOD;
pcSurfaceWidth: TPCSURFACEWIDTHMETHOD;
pcSurfaceHeight: TPCSURFACEHEIGHTMETHOD;
pcGetPageRect: TPCGETPAGERECTMETHOD;
pcSetSurfaceMargin: TPCSETSURFACEMARGINMETHOD;
pcSetScrollPositions: TPCSETSCROLLPOSITIONSMETHOD;
pcSetHScrollPosition: TPCSETHSCROLLPOSITIONMETHOD;
pcSetVScrollPosition: TPCSETVSCROLLPOSITIONMETHOD;
pcSetHScrollDelta: TPCSETHSCROLLDELTAMETHOD;
pcSetVScrollDelta: TPCSETVSCROLLDELTAMETHOD;
pcHSCBarPosition: TPCHSCBARPOSITIONMETHOD;
pcVSCBarPosition: TPCVSCBARPOSITIONMETHOD;
pcPointInHScroll: TPCPOINTINHSCROLLMETHOD;
pcPointInVScroll: TPCPOINTINVSCROLLMETHOD;
pcPointInHRuler: TPCPOINTINHRULERMETHOD;
pcPointInVRuler: TPCPOINTINVRULERMETHOD;
pcCenterLocation: TPCCENTERLOCATIONMETHOD;
pcPointInView: TPCPOINTINVIEWMETHOD;
pcZoomDetailPoint: TPCZOOMDETAILPOINTMETHOD;
pcHitTestModPointInt: TPCHITTESTMODPOINTINTMETHOD;
pcSimulateTrace: TPCSIMULATETRACEMETHOD;
pcSimulateDown: TPCSIMULATEDOWNMETHOD;
pcSimulateUp: TPCSIMULATEUPMETHOD;
pcSimulateRightClick: TPCSIMULATERIGHTCLICKMETHOD;
pcSetSelectionHatch: TPCSETSELECTIONHATCHMETHOD;
pcSetSelectionGradient: TPCSETSELECTIONGRADIENTMETHOD;
pcSetSelectionTexture: TPCSETSELECTIONTEXTUREMETHOD;
pcNewLayer: TPCNEWLAYERMETHOD;
pcDeleteLayer: TPCDELETELAYERMETHOD;
pcDeleteLayerWithNbr: TPCDELETELAYERWITHNBRMETHOD;
pcDeleteAllUserLayers: TPCDELETEALLUSERLAYERSMETHOD;
pcUnDo: TPCUNDOMETHOD;
pcReDo: TPCREDOMETHOD;
pcClearUndoList: TPCCLEARUNDOLISTMETHOD;
pcShowLayer: TPCSHOWLAYERMETHOD;
pcHideLayer: TPCHIDELAYERMETHOD;
pcHideAllLayers: TPCHIDEALLLAYERSMETHOD;
pcGrayLayer: TPCGRAYLAYERMETHOD;
pcExGrayLayer: TPCEXGRAYLAYERMETHOD;
pcExHideLayer: TPCEXHIDELAYERMETHOD;
pcShowAllLayers: TPCSHOWALLLAYERSMETHOD;
pcMergeAllLayers: TPCMERGEALLLAYERSMETHOD;
pcMergeVisibleLayers: TPCMERGEVISIBLELAYERSMETHOD;
pcGetLayerName: TPCGETLAYERNAMEMETHOD;
pcGetLayerHandle: TPCGETLAYERHANDLEMETHOD;
pcGetLayerVisible: TPCGETLAYERVISIBLEMETHOD;
pcGetLayerGrayed: TPCGETLAYERGRAYEDMETHOD;
pcGetSelectedHandle: TPCGETSELECTEDHANDLEMETHOD;
pcFigureGetHandle: TPCFIGUREGETHANDLEMETHOD;
pcFigureGetName: TPCFIGUREGETNAMEMETHOD;
pcFigureGetClass: TPCFIGUREGETCLASSMETHOD;
pcFigureGetPointCount: TPCFIGUREGETPOINTCOUNTMETHOD;
pcFigureGetPoint: TPCFIGUREGETPOINTMETHOD;
pcFigureGetDCPoint: TPCFIGUREGETDCPOINTMETHOD;
pcFigureGetCenter: TPCFIGUREGETCENTERMETHOD;
pcFigureGetRect: TPCFIGUREGETRECTMETHOD;
pcFigureGetRadius: TPCFIGUREGETRADIUSMETHOD;
pcFigureGetFontName: TPCFIGUREGETFONTNAMEMETHOD;
pcFigureGetFontBold: TPCFIGUREGETFONTBOLDMETHOD;
pcFigureGetFontItalic: TPCFIGUREGETFONTITALICMETHOD;
pcFigureGetFontUnderline: TPCFIGUREGETFONTUNDERLINEMETHOD;
pcFigureGetFontStrike: TPCFIGUREGETFONTSTRIKEMETHOD;
pcFigureGetFontSize: TPCFIGUREGETFONTSIZEMETHOD;
pcFigureGetFontCharset: TPCFIGUREGETFONTCHARSETMETHOD;
pcFigureGetFontColor: TPCFIGUREGETFONTCOLORMETHOD;
pcFigureGetPenColor: TPCFIGUREGETPENCOLORMETHOD;
pcFigureGetBrushColor: TPCFIGUREGETBRUSHCOLORMETHOD;
pcFigureGetPenStyle: TPCFIGUREGETPENSTYLEMETHOD;
pcFigureGetBrushStyle: TPCFIGUREGETBRUSHSTYLEMETHOD;
pcFigureGetRowStyle: TPCFIGUREGETROWSTYLEMETHOD;
pcFigureGetPenWidth: TPCFIGUREGETPENWIDTHMETHOD;
pcFigureGetInfo: TPCFIGUREGETINFOMETHOD;
pcFigureGetAngle: TPCFIGUREGETANGLEMETHOD;
pcFigureGetLayerHandle: TPCFIGUREGETLAYERHANDLEMETHOD;
pcFigureGetDiagonal: TPCFIGUREGETDIAGONALMETHOD;
pcFigureGetLockMove: TPCFIGUREGETLOCKMOVEMETHOD;
pcFigureGetLockModify: TPCFIGUREGETLOCKMODIFYMETHOD;
pcFigureGetSelected: TPCFIGUREGETSELECTEDMETHOD;
pcFigureTestPoint: TPCFIGURETESTPOINTMETHOD;
pcFigureTestRect: TPCFIGURETESTRECTMETHOD;
pcFigureGetRgnHandle: TPCFIGUREGETRGNHANDLEMETHOD;
pcFigureSelect: TPCFIGURESELECTMETHOD;
pcFigureSelectAsRotate: TPCFIGURESELECTASROTATEMETHOD;
pcFigureDeSelect: TPCFIGUREDESELECTMETHOD;
pcFigureEdit: TPCFIGUREEDITMETHOD;
pcFigureMove: TPCFIGUREMOVEMETHOD;
pcFigureRotate: TPCFIGUREROTATEMETHOD;
pcFigureRotateByPoint: TPCFIGUREROTATEBYPOINTMETHOD;
pcFigureMirror: TPCFIGUREMIRRORMETHOD;
pcFigureScale: TPCFIGURESCALEMETHOD;
pcFigureScaleByPoint: TPCFIGURESCALEBYPOINTMETHOD;
pcFigureSetFontName: TPCFIGURESETFONTNAMEMETHOD;
pcFigureSetFontBold: TPCFIGURESETFONTBOLDMETHOD;
pcFigureSetFontItalic: TPCFIGURESETFONTITALICMETHOD;
pcFigureSetFontUnderline: TPCFIGURESETFONTUNDERLINEMETHOD;
pcFigureSetFontStrike: TPCFIGURESETFONTSTRIKEMETHOD;
pcFigureSetFontSize: TPCFIGURESETFONTSIZEMETHOD;
pcFigureSetFontCharset: TPCFIGURESETFONTCHARSETMETHOD;
pcFigureSetFontColor: TPCFIGURESETFONTCOLORMETHOD;
pcFigureSetPenColor: TPCFIGURESETPENCOLORMETHOD;
pcFigureSetBrushColor: TPCFIGURESETBRUSHCOLORMETHOD;
pcFigureSetPenStyle: TPCFIGURESETPENSTYLEMETHOD;
pcFigureSetBrushStyle: TPCFIGURESETBRUSHSTYLEMETHOD;
pcFigureSetRowStyle: TPCFIGURESETROWSTYLEMETHOD;
pcFigureSetPenWidth: TPCFIGURESETPENWIDTHMETHOD;
pcFigureSetPoint: TPCFIGURESETPOINTMETHOD;
pcFigureSetInfo: TPCFIGURESETINFOMETHOD;
pcFigureSetAngle: TPCFIGURESETANGLEMETHOD;
pcFigureSetLayerHandle: TPCFIGURESETLAYERHANDLEMETHOD;
pcFigureSetDiagonal: TPCFIGURESETDIAGONALMETHOD;
pcFigureSetLockMove: TPCFIGURESETLOCKMOVEMETHOD;
pcFigureSetLockModify: TPCFIGURESETLOCKMODIFYMETHOD;
pcFigureSetRgnHandle: TPCFIGURESETRGNHANDLEMETHOD;
pcGetDCPoint: TPCGETDCPOINTMETHOD;
pcGetDCLen: TPCGETDCLENMETHOD;
pcFigureGrpGetFigureCount: TPCFIGUREGRPGETFIGURECOUNTMETHOD;
pcFigureGrpGetFigureHandle: TPCFIGUREGRPGETFIGUREHANDLEMETHOD;
pcFigureGrpGetCombined: TPCFIGUREGRPGETCOMBINEDMETHOD;
pcFigureGrpSetCombined: TPCFIGUREGRPSETCOMBINEDMETHOD;
pcFigureGrpUngroup: TPCFIGUREGRPUNGROUPMETHOD;
pcFigureBlockGetBlockname: TPCFIGUREBLOCKGETBLOCKNAMEMETHOD;
pcFigureGetJoin1: TPCFIGUREGETJOIN1METHOD;
pcFigureGetJoin2: TPCFIGUREGETJOIN2METHOD;
pcFigureSetJoin1: TPCFIGURESETJOIN1METHOD;
pcFigureSetJoin2: TPCFIGURESETJOIN2METHOD;
pcFigureGetClosed: TPCFIGUREGETCLOSEDMETHOD;
pcFigureSetClosed: TPCFIGURESETCLOSEDMETHOD;
pcFigureGetControlPoint: TPCFIGUREGETCONTROLPOINTMETHOD;
pcFigureSetControlPoints: TPCFIGURESETCONTROLPOINTSMETHOD;
pcFigureGetSegmentType: TPCFIGUREGETSEGMENTTYPEMETHOD;
pcFigureSetSegmentType: TPCFIGURESETSEGMENTTYPEMETHOD;
pcFigureInvertArcSegment: TPCFIGUREINVERTARCSEGMENTMETHOD;
pcFigureConvertPLBezier: TPCFIGURECONVERTPLBEZIERMETHOD;
pcFigureConvertPLPolyline: TPCFIGURECONVERTPLPOLYLINEMETHOD;
pcFigureGetElpALen: TPCFIGUREGETELPALENMETHOD;
pcFigureGetElpBLen: TPCFIGUREGETELPBLENMETHOD;
pcFigureGetArcStyle: TPCFIGUREGETARCSTYLEMETHOD;
pcFigureSetArcStyle: TPCFIGURESETARCSTYLEMETHOD;
pcFigureInvertArc: TPCFIGUREINVERTARCMETHOD;
pcFigureGetArcSAngle: TPCFIGUREGETARCSANGLEMETHOD;
pcFigureGetArcFAngle: TPCFIGUREGETARCFANGLEMETHOD;
pcFigureSetArcAngles: TPCFIGURESETARCANGLESMETHOD;
pcFigureGetRichText: TPCFIGUREGETRICHTEXTMETHOD;
pcFigureSetRichText: TPCFIGURESETRICHTEXTMETHOD;
pcFigureGetPictureName: TPCFIGUREGETPICTURENAMEMETHOD;
pcFigureGetTransparent: TPCFIGUREGETTRANSPARENTMETHOD;
pcFigureSetTransparent: TPCFIGURESETTRANSPARENTMETHOD;
pcFigureFlipHorz: TPCFIGUREFLIPHORZMETHOD;
pcFigureFlipVert: TPCFIGUREFLIPVERTMETHOD;
pcFigureSkewBitmap: TPCFIGURESKEWBITMAPMETHOD;
pcFigureSaveBitmapToFile: TPCFIGURESAVEBITMAPTOFILEMETHOD;
pcFigureLoadBitmapFromFile: TPCFIGURELOADBITMAPFROMFILEMETHOD;
pcFigureGetText: TPCFIGUREGETTEXTMETHOD;
pcFigureSetText: TPCFIGURESETTEXTMETHOD;
pcDrawUserFigureEvent: TPCDRAWUSERFIGUREEVENTMETHOD;
pcPointInUserFigureEvent: TPCPOINTINUSERFIGUREEVENTMETHOD;
pcDraw: TPCDRAWMETHOD;
pcDrawFigures: TPCDRAWFIGURESMETHOD;
pcDrawSelectedFigures: TPCDRAWSELECTEDFIGURESMETHOD;
pcDrawSelectionPoints: TPCDRAWSELECTIONPOINTSMETHOD;
pcDrawFigureGuides: TPCDRAWFIGUREGUIDESMETHOD;
pcSelectAll: TPCSELECTALLMETHOD;
pcDeselectAll: TPCDESELECTALLMETHOD;
pcInvertSelection: TPCINVERTSELECTIONMETHOD;
pcGroupSelection: TPCGROUPSELECTIONMETHOD;
pcUngroupSelection: TPCUNGROUPSELECTIONMETHOD;
pcOrderSelection: TPCORDERSELECTIONMETHOD;
pcRemoveSelection: TPCREMOVESELECTIONMETHOD;
pcRotateSelectionCenter: TPCROTATESELECTIONCENTERMETHOD;
pcRotateSelection: TPCROTATESELECTIONMETHOD;
pcMirrorSelection: TPCMIRRORSELECTIONMETHOD;
pcKnifeSelection: TPCKNIFESELECTIONMETHOD;
pcCreateDimLinesOfSelection: TPCCREATEDIMLINESOFSELECTIONMETHOD;
pcClearDimLinesOfSelection: TPCCLEARDIMLINESOFSELECTIONMETHOD;
pcInterBreakSelection: TPCINTERBREAKSELECTIONMETHOD;
pcLockSelectionToMove: TPCLOCKSELECTIONTOMOVEMETHOD;
pcLockSelectionToModify: TPCLOCKSELECTIONTOMODIFYMETHOD;
pcInvertArcsOfSelection: TPCINVERTARCSOFSELECTIONMETHOD;
pcArrangeArcStyleOfSelection: TPCARRANGEARCSTYLEOFSELECTIONMETHOD;
pcCloseSelectedPolyline: TPCCLOSESELECTEDPOLYLINEMETHOD;
pcOpenSelectedPolyline: TPCOPENSELECTEDPOLYLINEMETHOD;
pcSimplfySelectedPolyline: TPCSIMPLFYSELECTEDPOLYLINEMETHOD;
pcNameSelection: TPCNAMESELECTIONMETHOD;
pcConvertPLToBezier: TPCCONVERTPLTOBEZIERMETHOD;
pcConvertPLToPolyline: TPCCONVERTPLTOPOLYLINEMETHOD;
pcFlipImagesOfSelection: TPCFLIPIMAGESOFSELECTIONMETHOD;
pcsetTransparentOfSelection: TPCSETTRANSPARENTOFSELECTIONMETHOD;
pcScaleSelection: TPCSCALESELECTIONMETHOD;
pcScaleDrawing: TPCSCALEDRAWINGMETHOD;
pcModifyFontName: TPCMODIFYFONTNAMEMETHOD;
pcModifyFontBold: TPCMODIFYFONTBOLDMETHOD;
pcModifyFontItalic: TPCMODIFYFONTITALICMETHOD;
pcModifyFontUnderline: TPCMODIFYFONTUNDERLINEMETHOD;
pcModifyFontStrike: TPCMODIFYFONTSTRIKEMETHOD;
pcModifyFontSize: TPCMODIFYFONTSIZEMETHOD;
pcModifyFontCharset: TPCMODIFYFONTCHARSETMETHOD;
pcModifyFontColor: TPCMODIFYFONTCOLORMETHOD;
pcModifyPenColor: TPCMODIFYPENCOLORMETHOD;
pcModifyBrushColor: TPCMODIFYBRUSHCOLORMETHOD;
pcModifyPenStyle: TPCMODIFYPENSTYLEMETHOD;
pcModifyBrushStyle: TPCMODIFYBRUSHSTYLEMETHOD;
pcModifyRowStyle: TPCMODIFYROWSTYLEMETHOD;
pcModifyPenWidth: TPCMODIFYPENWIDTHMETHOD;
pcIsTextSelected: TPCISTEXTSELECTEDMETHOD;
pcGetSelectionBoundS: TPCGETSELECTIONBOUNDSMETHOD;
pcGetDrawingBounds: TPCGETDRAWINGBOUNDSMETHOD;
pcReDrawSelection: TPCREDRAWSELECTIONMETHOD;
pcReDrawSelectionPoints: TPCREDRAWSELECTIONPOINTSMETHOD;
pcManualRefresh: TPCMANUALREFRESHMETHOD;
pcRefreshSelection: TPCREFRESHSELECTIONMETHOD;
pcReselect: TPCRESELECTMETHOD;
pcGetSurfaceBitmapHandle: TPCGETSURFACEBITMAPHANDLEMETHOD;
pcSelectByPoint: TPCSELECTBYPOINTMETHOD;
pcDoMagicWand: TPCDOMAGICWANDMETHOD;
pcSelectByFigure: TPCSELECTBYFIGUREMETHOD;
pcSelectWithInArea: TPCSELECTWITHINAREAMETHOD;
pcSelectFigure: TPCSELECTFIGUREMETHOD;
pcDeSelectFigure: TPCDESELECTFIGUREMETHOD;
pcMoveSelection: TPCMOVESELECTIONMETHOD;
pcMoveAll: TPCMOVEALLMETHOD;
pcMoveAllSilent: TPCMOVEALLSILENTMETHOD;
pcDuplicateSelection: TPCDUPLICATESELECTIONMETHOD;
pcDuplicateSelectionAsBezier: TPCDUPLICATESELECTIONASBEZIERMETHOD;
pcConvertSelectionToBezier: TPCCONVERTSELECTIONTOBEZIERMETHOD;
pcArrayRectSelection: TPCARRAYRECTSELECTIONMETHOD;
pcArrayPolarSelection: TPCARRAYPOLARSELECTIONMETHOD;
pcMakeSelectionBlock: TPCMAKESELECTIONBLOCKMETHOD;
pcBoundSelectedLine: TPCBOUNDSELECTEDLINEMETHOD;
pcBoundLineToFigures: TPCBOUNDLINETOFIGURESMETHOD;
pcBoundLinePoint: TPCBOUNDLINEPOINTMETHOD;
pcUnBoundLine: TPCUNBOUNDLINEMETHOD;
pcMakeSelectedLinesPolyline: TPCMAKESELECTEDLINESPOLYLINEMETHOD;
pcWeldIntoPolyline: TPCWELDINTOPOLYLINEMETHOD;
pcOffSetSelection: TPCOFFSETSELECTIONMETHOD;
pcClipSelBitmapToSelFigure: TPCCLIPSELBITMAPTOSELFIGUREMETHOD;
pcUnClipSelBitmap: TPCUNCLIPSELBITMAPMETHOD;
pcSaveToFile: TPCSAVETOFILEMETHOD;
pcLoadFromFile: TPCLOADFROMFILEMETHOD;
pcInsertBlockwithFileName: TPCINSERTBLOCKWITHFILENAMEMETHOD;
pcSetBlockInfo: TPCSETBLOCKINFOMETHOD;
pcExportAsWmf: TPCEXPORTASWMFMETHOD;
pcExportAsDxf: TPCEXPORTASDXFMETHOD;
pcSelectionAsMetaFile: TPCSELECTIONASMETAFILEMETHOD;
pcDrawingAsMetaFile: TPCDRAWINGASMETAFILEMETHOD;
pcFigureAsMetaFile: TPCFIGUREASMETAFILEMETHOD;
pcSelectionAsBmpHandle: TPCSELECTIONASBMPHANDLEMETHOD;
pcSaveAsBitmap: TPCSAVEASBITMAPMETHOD;
pcCreatePreviewBitmapHandle: TPCCREATEPREVIEWBITMAPHANDLEMETHOD;
pcDrawToDC: TPCDRAWTODCMETHOD;
pcStretchToDC: TPCSTRETCHTODCMETHOD;
pcPrintDrawing: TPCPRINTDRAWINGMETHOD;
pcPrintDrawingAsWmf: TPCPRINTDRAWINGASWMFMETHOD;
pcPrnStartJob: TPCPRNSTARTJOBMETHOD;
pcPrnDoJob: TPCPRNDOJOBMETHOD;
pcPrnEndJob: TPCPRNENDJOBMETHOD;
pcPrnAbortJob: TPCPRNABORTJOBMETHOD;
pcPrintByTiling: TPCPRINTBYTILINGMETHOD;
pcImportDXF: TPCIMPORTDXFMETHOD;
pcClear: TPCCLEARMETHOD;
pcCopyToClipBoard: TPCCOPYTOCLIPBOARDMETHOD;
pcCutToClipBoard: TPCCUTTOCLIPBOARDMETHOD;
pcSetFieldText: TPCSETFIELDTEXTMETHOD;
pcPasteFromClipBoard: TPCPASTEFROMCLIPBOARDMETHOD;
pcGetLayerNbr: TPCGETLAYERNBRMETHOD;
pcFindFigureByName: TPCFINDFIGUREBYNAMEMETHOD;
pcLine: TPCLINEMETHOD;
pcVertex: TPCVERTEXMETHOD;
pcPolyLine: TPCPOLYLINEMETHOD;
pcEllipse: TPCELLIPSEMETHOD;
pcDrawCircle: TPCDRAWCIRCLEMETHOD;
pcArc: TPCARCMETHOD;
pcElpArc: TPCELPARCMETHOD;
pcRectangle: TPCRECTANGLEMETHOD;
pcInsertBitmap: TPCINSERTBITMAPMETHOD;
pcInsertBitmapHandle: TPCINSERTBITMAPHANDLEMETHOD;
pcInsertWMF: TPCINSERTWMFMETHOD;
pcImportWMF: TPCIMPORTWMFMETHOD;
pcImportDrawing: TPCIMPORTDRAWINGMETHOD;
pcTextOut: TPCTEXTOUTMETHOD;
pcGetFigureCustomStream: TPCGETFIGURECUSTOMSTREAMMETHOD;
pcSetFigureCustomStream: TPCSETFIGURECUSTOMSTREAMMETHOD;
pcGetCustomStream: TPCGETCUSTOMSTREAMMETHOD;
pcSetCustomStream: TPCSETCUSTOMSTREAMMETHOD;
pcPrintPreview: TPCPRINTPREVIEWMETHOD;
pcGetSlcPenStyle: TPCGETSLCPENSTYLEMETHOD;
pcGetSlcPenWidth: TPCGETSLCPENWIDTHMETHOD;
pcGetSlcPenColor: TPCGETSLCPENCOLORMETHOD;
pcGetSlcRowStyle: TPCGETSLCROWSTYLEMETHOD;
pcGetSlcBrushStyle: TPCGETSLCBRUSHSTYLEMETHOD;
pcGetSlcBrushColor: TPCGETSLCBRUSHCOLORMETHOD;
pcGetSlcFontName: TPCGETSLCFONTNAMEMETHOD;
pcGetSlcFontBold: TPCGETSLCFONTBOLDMETHOD;
pcGetSlcFontItalic: TPCGETSLCFONTITALICMETHOD;
pcGetSlcFontStrike: TPCGETSLCFONTSTRIKEMETHOD;
pcGetSlcFontSize: TPCGETSLCFONTSIZEMETHOD;
pcGetSlcFontColor: TPCGETSLCFONTCOLORMETHOD;
pcGetSlcPolylineClosed: TPCGETSLCPOLYLINECLOSEDMETHOD;
pcGetSlcImageTransparent: TPCGETSLCIMAGETRANSPARENTMETHOD;
pcGetSlcImageClipped: TPCGETSLCIMAGECLIPPEDMETHOD;
pcGetSlcArcStyle: TPCGETSLCARCSTYLEMETHOD;
pcGetSlcLineBounded: TPCGETSLCLINEBOUNDEDMETHOD;
pcCountBlock: TPCCOUNTBLOCKMETHOD;
pcExecuteTBCommand: TPCEXECUTETBCOMMANDMETHOD;
pcGetVersion: TPCGETVERSIONMETHOD;
pcGetBuildNumber: TPCGETBUILDNUMBERMETHOD;
pcBlockAsMetafile: TPCBLOCKASMETAFILEMETHOD;
pcLockSelChange: TPCLOCKSELCHANGEMETHOD;
pcUnLockSelChange: TPCUNLOCKSELCHANGEMETHOD;
pcCenterPage: TPCCENTERPAGEMETHOD;
pcAlignPageDown: TPCALIGNPAGEDOWNMETHOD;
pcAlignPageUp: TPCALIGNPAGEUPMETHOD;
pcStartBlink: TPCSTARTBLINKMETHOD;
pcStopBlink: TPCSTOPBLINKMETHOD;
pcResumeBlink: TPCRESUMEBLINKMETHOD;
pcIsBlinking: TPCISBLINKINGMETHOD;
pcCalibrateLayerScale: TPCCALIBRATELAYERSCALEMETHOD;
pccNewDrawing: TPCCNEWDRAWINGMETHOD;
pccOpenDrawing: TPCCOPENDRAWINGMETHOD;
pccOpenDrawingFile: TPCCOPENDRAWINGFILEMETHOD;
pccSaveDrawing: TPCCSAVEDRAWINGMETHOD;
pccSaveAsDrawing: TPCCSAVEASDRAWINGMETHOD;
pccPrintDrawing: TPCCPRINTDRAWINGMETHOD;
pccPrintDrawingAsWmf: TPCCPRINTDRAWINGASWMFMETHOD;
pccTestPrinter: TPCCTESTPRINTERMETHOD;
pccExportAs: TPCCEXPORTASMETHOD;
pccImportDxf: TPCCIMPORTDXFMETHOD;
pcDoPopUp: TPCDOPOPUPMETHOD;
pcExecuteCustomCommand: TPCEXECUTECUSTOMCOMMANDMETHOD;
pcExecuteVerbalCommand: TPCEXECUTEVERBALCOMMANDMETHOD;
pcExitApplication: TPCEXITAPPLICATIONMETHOD;
pcIsUnNamed: TPCISUNNAMEDMETHOD;
  
implementation

Procedure GetAdresses(OwnerApp:Integer);
begin
  @pcGetPropDotsPerMil := GetProcAddress(OwnerApp,'pcGetPropDotsPerMil');
  @pcGetPropLocked := GetProcAddress(OwnerApp,'pcGetPropLocked');
  @pcSetPropLocked := GetProcAddress(OwnerApp,'pcSetPropLocked');
  @pcGetPropUpdated := GetProcAddress(OwnerApp,'pcGetPropUpdated');
  @pcSetPropUpdated := GetProcAddress(OwnerApp,'pcSetPropUpdated');
  @pcGetPropAutoRefresh := GetProcAddress(OwnerApp,'pcGetPropAutoRefresh');
  @pcSetPropAutoRefresh := GetProcAddress(OwnerApp,'pcSetPropAutoRefresh');
  @pcGetPropRulerVisible := GetProcAddress(OwnerApp,'pcGetPropRulerVisible');
  @pcSetPropRulerVisible := GetProcAddress(OwnerApp,'pcSetPropRulerVisible');
  @pcGetPropVerticalZero := GetProcAddress(OwnerApp,'pcGetPropVerticalZero');
  @pcSetPropVerticalZero := GetProcAddress(OwnerApp,'pcSetPropVerticalZero');
  @pcGetPropHorizontalZero := GetProcAddress(OwnerApp,'pcGetPropHorizontalZero');
  @pcSetPropHorizontalZero := GetProcAddress(OwnerApp,'pcSetPropHorizontalZero');
  @pcGetPropToolIdx := GetProcAddress(OwnerApp,'pcGetPropToolIdx');
  @pcGetPropToolInfo := GetProcAddress(OwnerApp,'pcGetPropToolInfo');
  @pcGetPropToolData := GetProcAddress(OwnerApp,'pcGetPropToolData');
  @pcGetPropDotsPerMilOrig := GetProcAddress(OwnerApp,'pcGetPropDotsPerMilOrig');
  @pcSetPropDotsPerMilOrig := GetProcAddress(OwnerApp,'pcSetPropDotsPerMilOrig');
  @pcGetPropActiveLayer := GetProcAddress(OwnerApp,'pcGetPropActiveLayer');
  @pcSetPropActiveLayer := GetProcAddress(OwnerApp,'pcSetPropActiveLayer');
  @pcGetPropZoomScale := GetProcAddress(OwnerApp,'pcGetPropZoomScale');
  @pcSetPropZoomScale := GetProcAddress(OwnerApp,'pcSetPropZoomScale');
  @pcGetPropGuidesVisible := GetProcAddress(OwnerApp,'pcGetPropGuidesVisible');
  @pcSetPropGuidesVisible := GetProcAddress(OwnerApp,'pcSetPropGuidesVisible');
  @pcGetPropBackGround := GetProcAddress(OwnerApp,'pcGetPropBackGround');
  @pcSetPropBackGround := GetProcAddress(OwnerApp,'pcSetPropBackGround');
  @pcGetPropPageColor := GetProcAddress(OwnerApp,'pcGetPropPageColor');
  @pcSetPropPageColor := GetProcAddress(OwnerApp,'pcSetPropPageColor');
  @pcGetPropGrids := GetProcAddress(OwnerApp,'pcGetPropGrids');
  @pcSetPropGrids := GetProcAddress(OwnerApp,'pcSetPropGrids');
  @pcGetPropGridType := GetProcAddress(OwnerApp,'pcGetPropGridType');
  @pcSetPropGridType := GetProcAddress(OwnerApp,'pcSetPropGridType');
  @pcGetPropCenterGuide := GetProcAddress(OwnerApp,'pcGetPropCenterGuide');
  @pcSetPropCenterGuide := GetProcAddress(OwnerApp,'pcSetPropCenterGuide');
  @pcGetPropPageGuide := GetProcAddress(OwnerApp,'pcGetPropPageGuide');
  @pcSetPropPageGuide := GetProcAddress(OwnerApp,'pcSetPropPageGuide');
  @pcGetPropDrawShadow := GetProcAddress(OwnerApp,'pcGetPropDrawShadow');
  @pcSetPropDrawShadow := GetProcAddress(OwnerApp,'pcSetPropDrawShadow');
  @pcGetPropDrawPageBorder := GetProcAddress(OwnerApp,'pcGetPropDrawPageBorder');
  @pcSetPropDrawPageBorder := GetProcAddress(OwnerApp,'pcSetPropDrawPageBorder');
  @pcGetPropGridColor := GetProcAddress(OwnerApp,'pcGetPropGridColor');
  @pcSetPropGridColor := GetProcAddress(OwnerApp,'pcSetPropGridColor');
  @pcGetPropGuideColor := GetProcAddress(OwnerApp,'pcGetPropGuideColor');
  @pcSetPropGuideColor := GetProcAddress(OwnerApp,'pcSetPropGuideColor');
  @pcGetPropRulerColor := GetProcAddress(OwnerApp,'pcGetPropRulerColor');
  @pcSetPropRulerColor := GetProcAddress(OwnerApp,'pcSetPropRulerColor');
  @pcGetPropGridStep := GetProcAddress(OwnerApp,'pcGetPropGridStep');
  @pcSetPropGridStep := GetProcAddress(OwnerApp,'pcSetPropGridStep');
  @pcGetPropWorkHeight := GetProcAddress(OwnerApp,'pcGetPropWorkHeight');
  @pcSetPropWorkHeight := GetProcAddress(OwnerApp,'pcSetPropWorkHeight');
  @pcGetPropWorkWidth := GetProcAddress(OwnerApp,'pcGetPropWorkWidth');
  @pcSetPropWorkWidth := GetProcAddress(OwnerApp,'pcSetPropWorkWidth');
  @pcGetPropPageLayout := GetProcAddress(OwnerApp,'pcGetPropPageLayout');
  @pcSetPropPageLayout := GetProcAddress(OwnerApp,'pcSetPropPageLayout');
  @pcGetPropPageOrient := GetProcAddress(OwnerApp,'pcGetPropPageOrient');
  @pcSetPropPageOrient := GetProcAddress(OwnerApp,'pcSetPropPageOrient');
  @pcGetPropGuideTrace := GetProcAddress(OwnerApp,'pcGetPropGuideTrace');
  @pcSetPropGuideTrace := GetProcAddress(OwnerApp,'pcSetPropGuideTrace');
  @pcGetPropSnapToGuides := GetProcAddress(OwnerApp,'pcGetPropSnapToGuides');
  @pcSetPropSnapToGuides := GetProcAddress(OwnerApp,'pcSetPropSnapToGuides');
  @pcGetPropSnapToNearPoint := GetProcAddress(OwnerApp,'pcGetPropSnapToNearPoint');
  @pcSetPropSnapToNearPoint := GetProcAddress(OwnerApp,'pcSetPropSnapToNearPoint');
  @pcGetPropSnapToGrids := GetProcAddress(OwnerApp,'pcGetPropSnapToGrids');
  @pcSetPropSnapToGrids := GetProcAddress(OwnerApp,'pcSetPropSnapToGrids');
  @pcGetPropScrollBars := GetProcAddress(OwnerApp,'pcGetPropScrollBars');
  @pcSetPropScrollBars := GetProcAddress(OwnerApp,'pcSetPropScrollBars');
  @pcGetPropRulerSystem := GetProcAddress(OwnerApp,'pcGetPropRulerSystem');
  @pcSetPropRulerSystem := GetProcAddress(OwnerApp,'pcSetPropRulerSystem');
  @pcGetPropDrawInCursor := GetProcAddress(OwnerApp,'pcGetPropDrawInCursor');
  @pcSetPropDrawInCursor := GetProcAddress(OwnerApp,'pcSetPropDrawInCursor');
  @pcGetPropRealScale := GetProcAddress(OwnerApp,'pcGetPropRealScale');
  @pcSetPropRealScale := GetProcAddress(OwnerApp,'pcSetPropRealScale');
  @pcGetPropMetricMode := GetProcAddress(OwnerApp,'pcGetPropMetricMode');
  @pcSetPropMetricMode := GetProcAddress(OwnerApp,'pcSetPropMetricMode');
  @pcGetPropAngularMode := GetProcAddress(OwnerApp,'pcGetPropAngularMode');
  @pcSetPropAngularMode := GetProcAddress(OwnerApp,'pcSetPropAngularMode');
  @pcGetPropWmfPrinting := GetProcAddress(OwnerApp,'pcGetPropWmfPrinting');
  @pcSetPropWmfPrinting := GetProcAddress(OwnerApp,'pcSetPropWmfPrinting');
  @pcGetPropDefaultPenColor := GetProcAddress(OwnerApp,'pcGetPropDefaultPenColor');
  @pcSetPropDefaultPenColor := GetProcAddress(OwnerApp,'pcSetPropDefaultPenColor');
  @pcGetPropDefaultBrushColor := GetProcAddress(OwnerApp,'pcGetPropDefaultBrushColor');
  @pcSetPropDefaultBrushColor := GetProcAddress(OwnerApp,'pcSetPropDefaultBrushColor');
  @pcGetPropDefaultPenWidth := GetProcAddress(OwnerApp,'pcGetPropDefaultPenWidth');
  @pcSetPropDefaultPenWidth := GetProcAddress(OwnerApp,'pcSetPropDefaultPenWidth');
  @pcGetPropDefaultPenStyle := GetProcAddress(OwnerApp,'pcGetPropDefaultPenStyle');
  @pcSetPropDefaultPenStyle := GetProcAddress(OwnerApp,'pcSetPropDefaultPenStyle');
  @pcGetPropDefaultBrushStyle := GetProcAddress(OwnerApp,'pcGetPropDefaultBrushStyle');
  @pcSetPropDefaultBrushStyle := GetProcAddress(OwnerApp,'pcSetPropDefaultBrushStyle');
  @pcGetPropDefaultRowStyle := GetProcAddress(OwnerApp,'pcGetPropDefaultRowStyle');
  @pcSetPropDefaultRowStyle := GetProcAddress(OwnerApp,'pcSetPropDefaultRowStyle');
  @pcGetPropDefaultTextHeight := GetProcAddress(OwnerApp,'pcGetPropDefaultTextHeight');
  @pcSetPropDefaultTextHeight := GetProcAddress(OwnerApp,'pcSetPropDefaultTextHeight');
  @pcGetPropDefaultTextRatio := GetProcAddress(OwnerApp,'pcGetPropDefaultTextRatio');
  @pcSetPropDefaultTextRatio := GetProcAddress(OwnerApp,'pcSetPropDefaultTextRatio');
  @pcGetPropDefaultPLineClosed := GetProcAddress(OwnerApp,'pcGetPropDefaultPLineClosed');
  @pcSetPropDefaultPLineClosed := GetProcAddress(OwnerApp,'pcSetPropDefaultPLineClosed');
  @pcGetPropDefaultArcStyle := GetProcAddress(OwnerApp,'pcGetPropDefaultArcStyle');
  @pcSetPropDefaultArcStyle := GetProcAddress(OwnerApp,'pcSetPropDefaultArcStyle');
  @pcGetPropLayerCount := GetProcAddress(OwnerApp,'pcGetPropLayerCount');
  @pcGetPropFigureCount := GetProcAddress(OwnerApp,'pcGetPropFigureCount');
  @pcGetPropSelectedCount := GetProcAddress(OwnerApp,'pcGetPropSelectedCount');
  @pcGetPropMapScale := GetProcAddress(OwnerApp,'pcGetPropMapScale');
  @pcSetPropMapScale := GetProcAddress(OwnerApp,'pcSetPropMapScale');
  @pcGetPropRescaleToMap := GetProcAddress(OwnerApp,'pcGetPropRescaleToMap');
  @pcSetPropRescaleToMap := GetProcAddress(OwnerApp,'pcSetPropRescaleToMap');
  @pcGetPropAutoSelect := GetProcAddress(OwnerApp,'pcGetPropAutoSelect');
  @pcSetPropAutoSelect := GetProcAddress(OwnerApp,'pcSetPropAutoSelect');
  @pcGetPropKeyCommands := GetProcAddress(OwnerApp,'pcGetPropKeyCommands');
  @pcSetPropKeyCommands := GetProcAddress(OwnerApp,'pcSetPropKeyCommands');
  @pcGetPropRecordUndo := GetProcAddress(OwnerApp,'pcGetPropRecordUndo');
  @pcSetPropRecordUndo := GetProcAddress(OwnerApp,'pcSetPropRecordUndo');
  @pcGetPropUndoCount := GetProcAddress(OwnerApp,'pcGetPropUndoCount');
  @pcSetPropUndoCount := GetProcAddress(OwnerApp,'pcSetPropUndoCount');
  @pcGetPropDefaultPictureFolder := GetProcAddress(OwnerApp,'pcGetPropDefaultPictureFolder');
  @pcSetPropDefaultPictureFolder := GetProcAddress(OwnerApp,'pcSetPropDefaultPictureFolder');
  @pcGetPropSaveWithPreview := GetProcAddress(OwnerApp,'pcGetPropSaveWithPreview');
  @pcSetPropSaveWithPreview := GetProcAddress(OwnerApp,'pcSetPropSaveWithPreview');
  @pcGetPropRulerMode := GetProcAddress(OwnerApp,'pcGetPropRulerMode');
  @pcSetPropRulerMode := GetProcAddress(OwnerApp,'pcSetPropRulerMode');
  @pcGetPropZoomRect := GetProcAddress(OwnerApp,'pcGetPropZoomRect');
  @pcSetPropZoomRect := GetProcAddress(OwnerApp,'pcSetPropZoomRect');
  @pcGetPropRangeCheck := GetProcAddress(OwnerApp,'pcGetPropRangeCheck');
  @pcSetPropRangeCheck := GetProcAddress(OwnerApp,'pcSetPropRangeCheck');
  @pcGetPropAutoTilePrint := GetProcAddress(OwnerApp,'pcGetPropAutoTilePrint');
  @pcSetPropAutoTilePrint := GetProcAddress(OwnerApp,'pcSetPropAutoTilePrint');
  @pcGetPropFigureGuides := GetProcAddress(OwnerApp,'pcGetPropFigureGuides');
  @pcSetPropFigureGuides := GetProcAddress(OwnerApp,'pcSetPropFigureGuides');
  @pcGetPropNativeFill := GetProcAddress(OwnerApp,'pcGetPropNativeFill');
  @pcSetPropNativeFill := GetProcAddress(OwnerApp,'pcSetPropNativeFill');
  @pcGetPropActiveFile := GetProcAddress(OwnerApp,'pcGetPropActiveFile');
  @pcSetPropActiveFile := GetProcAddress(OwnerApp,'pcSetPropActiveFile');
  @pcGetPropCurrentColor := GetProcAddress(OwnerApp,'pcGetPropCurrentColor');
  @pcSetPropCurrentColor := GetProcAddress(OwnerApp,'pcSetPropCurrentColor');
  @pcGetPropCurrentStyle := GetProcAddress(OwnerApp,'pcGetPropCurrentStyle');
  @pcSetPropCurrentStyle := GetProcAddress(OwnerApp,'pcSetPropCurrentStyle');
  @pcGetPropCurrentString := GetProcAddress(OwnerApp,'pcGetPropCurrentString');
  @pcSetPropCurrentString := GetProcAddress(OwnerApp,'pcSetPropCurrentString');
  @pcGetPropCurrentFlag := GetProcAddress(OwnerApp,'pcGetPropCurrentFlag');
  @pcSetPropCurrentFlag := GetProcAddress(OwnerApp,'pcSetPropCurrentFlag');
  @pcGetPropCurrentFileName := GetProcAddress(OwnerApp,'pcGetPropCurrentFileName');
  @pcSetPropCurrentFileName := GetProcAddress(OwnerApp,'pcSetPropCurrentFileName');
  @pcGetPropCurrentValue := GetProcAddress(OwnerApp,'pcGetPropCurrentValue');
  @pcSetPropCurrentValue := GetProcAddress(OwnerApp,'pcSetPropCurrentValue');
  @pcGetPropFileExtension := GetProcAddress(OwnerApp,'pcGetPropFileExtension');
  @pcSetPropFileExtension := GetProcAddress(OwnerApp,'pcSetPropFileExtension');
  @pcGetPropMultiSelect := GetProcAddress(OwnerApp,'pcGetPropMultiSelect');
  @pcSetPropMultiSelect := GetProcAddress(OwnerApp,'pcSetPropMultiSelect');
  @pcGetPropOpenDialogTitle := GetProcAddress(OwnerApp,'pcGetPropOpenDialogTitle');
  @pcSetPropOpenDialogTitle := GetProcAddress(OwnerApp,'pcSetPropOpenDialogTitle');
  @pcGetPropOpenDialogFilter := GetProcAddress(OwnerApp,'pcGetPropOpenDialogFilter');
  @pcSetPropOpenDialogFilter := GetProcAddress(OwnerApp,'pcSetPropOpenDialogFilter');
  @pcGetPropSaveDialogTitle := GetProcAddress(OwnerApp,'pcGetPropSaveDialogTitle');
  @pcSetPropSaveDialogTitle := GetProcAddress(OwnerApp,'pcSetPropSaveDialogTitle');
  @pcGetPropSaveDialogFilter := GetProcAddress(OwnerApp,'pcGetPropSaveDialogFilter');
  @pcSetPropSaveDialogFilter := GetProcAddress(OwnerApp,'pcSetPropSaveDialogFilter');
  @pcGetPropAcceptFiles := GetProcAddress(OwnerApp,'pcGetPropAcceptFiles');
  @pcSetPropAcceptFiles := GetProcAddress(OwnerApp,'pcSetPropAcceptFiles');
  @pcGetPropMouseCommands := GetProcAddress(OwnerApp,'pcGetPropMouseCommands');
  @pcSetPropMouseCommands := GetProcAddress(OwnerApp,'pcSetPropMouseCommands');
  @pcGetPropPopStyle := GetProcAddress(OwnerApp,'pcGetPropPopStyle');
  @pcSetPropPopStyle := GetProcAddress(OwnerApp,'pcSetPropPopStyle');
  @pcGetPropCustomPopItems := GetProcAddress(OwnerApp,'pcGetPropCustomPopItems');
  @pcSetPropCustomPopItems := GetProcAddress(OwnerApp,'pcSetPropCustomPopItems');
  @pcGetPropMirrorStraight := GetProcAddress(OwnerApp,'pcGetPropMirrorStraight');
  @pcSetPropMirrorStraight := GetProcAddress(OwnerApp,'pcSetPropMirrorStraight');
  @pcGetPropDrawingPop := GetProcAddress(OwnerApp,'pcGetPropDrawingPop');
  @pcSetPropDrawingPop := GetProcAddress(OwnerApp,'pcSetPropDrawingPop');
  @pcPrintMessage := GetProcAddress(OwnerApp,'pcPrintMessage');
  @pcRefresh := GetProcAddress(OwnerApp,'pcRefresh');
  @pcClientToScreen := GetProcAddress(OwnerApp,'pcClientToScreen');
  @pcScreenToClient := GetProcAddress(OwnerApp,'pcScreenToClient');
  @pcSetCustomSurface := GetProcAddress(OwnerApp,'pcSetCustomSurface');
  @pcDoResize := GetProcAddress(OwnerApp,'pcDoResize');
  @pcSaveScroll := GetProcAddress(OwnerApp,'pcSaveScroll');
  @pcRestoreScroll := GetProcAddress(OwnerApp,'pcRestoreScroll');
  @pcReLocate := GetProcAddress(OwnerApp,'pcReLocate');
  @pcDoSurfaceMove := GetProcAddress(OwnerApp,'pcDoSurfaceMove');
  @pcDoSurfaceClick := GetProcAddress(OwnerApp,'pcDoSurfaceClick');
  @pcDoSurfaceDblClick := GetProcAddress(OwnerApp,'pcDoSurfaceDblClick');
  @pcDoSurfaceLeave := GetProcAddress(OwnerApp,'pcDoSurfaceLeave');
  @pcDoSurfaceDragDrop := GetProcAddress(OwnerApp,'pcDoSurfaceDragDrop');
  @pcDoSurfacePull := GetProcAddress(OwnerApp,'pcDoSurfacePull');
  @pcDoSurfacePush := GetProcAddress(OwnerApp,'pcDoSurfacePush');
  @pcDoSurfaceWheel := GetProcAddress(OwnerApp,'pcDoSurfaceWheel');
  @pcDoKeyStroke := GetProcAddress(OwnerApp,'pcDoKeyStroke');
  @pcCheckForGuideDrop := GetProcAddress(OwnerApp,'pcCheckForGuideDrop');
  @pcDragStarted := GetProcAddress(OwnerApp,'pcDragStarted');
  @pcGetSelectionRect := GetProcAddress(OwnerApp,'pcGetSelectionRect');
  @pcGetDrawingRect := GetProcAddress(OwnerApp,'pcGetDrawingRect');
  @pcGetVisibleRect := GetProcAddress(OwnerApp,'pcGetVisibleRect');
  @pcDeConvertXY := GetProcAddress(OwnerApp,'pcDeConvertXY');
  @pcDeConvertDim := GetProcAddress(OwnerApp,'pcDeConvertDim');
  @pcConvertXY := GetProcAddress(OwnerApp,'pcConvertXY');
  @pcConvertDim := GetProcAddress(OwnerApp,'pcConvertDim');
  @pcZoomArea := GetProcAddress(OwnerApp,'pcZoomArea');
  @pcFitToWindow := GetProcAddress(OwnerApp,'pcFitToWindow');
  @pcActualSize := GetProcAddress(OwnerApp,'pcActualSize');
  @pcZoomOut := GetProcAddress(OwnerApp,'pcZoomOut');
  @pcZoomIn := GetProcAddress(OwnerApp,'pcZoomIn');
  @pcClearGuides := GetProcAddress(OwnerApp,'pcClearGuides');
  @pcSetTool := GetProcAddress(OwnerApp,'pcSetTool');
  @pcSetCursor := GetProcAddress(OwnerApp,'pcSetCursor');
  @pcSetDragCursor := GetProcAddress(OwnerApp,'pcSetDragCursor');
  @pcCheckGuideLine := GetProcAddress(OwnerApp,'pcCheckGuideLine');
  @pcBeginHRulerDrag := GetProcAddress(OwnerApp,'pcBeginHRulerDrag');
  @pcBeginVRulerDrag := GetProcAddress(OwnerApp,'pcBeginVRulerDrag');
  @pcSurfaceWidth := GetProcAddress(OwnerApp,'pcSurfaceWidth');
  @pcSurfaceHeight := GetProcAddress(OwnerApp,'pcSurfaceHeight');
  @pcGetPageRect := GetProcAddress(OwnerApp,'pcGetPageRect');
  @pcSetSurfaceMargin := GetProcAddress(OwnerApp,'pcSetSurfaceMargin');
  @pcSetScrollPositions := GetProcAddress(OwnerApp,'pcSetScrollPositions');
  @pcSetHScrollPosition := GetProcAddress(OwnerApp,'pcSetHScrollPosition');
  @pcSetVScrollPosition := GetProcAddress(OwnerApp,'pcSetVScrollPosition');
  @pcSetHScrollDelta := GetProcAddress(OwnerApp,'pcSetHScrollDelta');
  @pcSetVScrollDelta := GetProcAddress(OwnerApp,'pcSetVScrollDelta');
  @pcHSCBarPosition := GetProcAddress(OwnerApp,'pcHSCBarPosition');
  @pcVSCBarPosition := GetProcAddress(OwnerApp,'pcVSCBarPosition');
  @pcPointInHScroll := GetProcAddress(OwnerApp,'pcPointInHScroll');
  @pcPointInVScroll := GetProcAddress(OwnerApp,'pcPointInVScroll');
  @pcPointInHRuler := GetProcAddress(OwnerApp,'pcPointInHRuler');
  @pcPointInVRuler := GetProcAddress(OwnerApp,'pcPointInVRuler');
  @pcCenterLocation := GetProcAddress(OwnerApp,'pcCenterLocation');
  @pcPointInView := GetProcAddress(OwnerApp,'pcPointInView');
  @pcZoomDetailPoint := GetProcAddress(OwnerApp,'pcZoomDetailPoint');
  @pcHitTestModPointInt := GetProcAddress(OwnerApp,'pcHitTestModPointInt');
  @pcSimulateTrace := GetProcAddress(OwnerApp,'pcSimulateTrace');
  @pcSimulateDown := GetProcAddress(OwnerApp,'pcSimulateDown');
  @pcSimulateUp := GetProcAddress(OwnerApp,'pcSimulateUp');
  @pcSimulateRightClick := GetProcAddress(OwnerApp,'pcSimulateRightClick');
  @pcSetSelectionHatch := GetProcAddress(OwnerApp,'pcSetSelectionHatch');
  @pcSetSelectionGradient := GetProcAddress(OwnerApp,'pcSetSelectionGradient');
  @pcSetSelectionTexture := GetProcAddress(OwnerApp,'pcSetSelectionTexture');
  @pcNewLayer := GetProcAddress(OwnerApp,'pcNewLayer');
  @pcDeleteLayer := GetProcAddress(OwnerApp,'pcDeleteLayer');
  @pcDeleteLayerWithNbr := GetProcAddress(OwnerApp,'pcDeleteLayerWithNbr');
  @pcDeleteAllUserLayers := GetProcAddress(OwnerApp,'pcDeleteAllUserLayers');
  @pcUnDo := GetProcAddress(OwnerApp,'pcUnDo');
  @pcReDo := GetProcAddress(OwnerApp,'pcReDo');
  @pcClearUndoList := GetProcAddress(OwnerApp,'pcClearUndoList');
  @pcShowLayer := GetProcAddress(OwnerApp,'pcShowLayer');
  @pcHideLayer := GetProcAddress(OwnerApp,'pcHideLayer');
  @pcHideAllLayers := GetProcAddress(OwnerApp,'pcHideAllLayers');
  @pcGrayLayer := GetProcAddress(OwnerApp,'pcGrayLayer');
  @pcExGrayLayer := GetProcAddress(OwnerApp,'pcExGrayLayer');
  @pcExHideLayer := GetProcAddress(OwnerApp,'pcExHideLayer');
  @pcShowAllLayers := GetProcAddress(OwnerApp,'pcShowAllLayers');
  @pcMergeAllLayers := GetProcAddress(OwnerApp,'pcMergeAllLayers');
  @pcMergeVisibleLayers := GetProcAddress(OwnerApp,'pcMergeVisibleLayers');
  @pcGetLayerName := GetProcAddress(OwnerApp,'pcGetLayerName');
  @pcGetLayerHandle := GetProcAddress(OwnerApp,'pcGetLayerHandle');
  @pcGetLayerVisible := GetProcAddress(OwnerApp,'pcGetLayerVisible');
  @pcGetLayerGrayed := GetProcAddress(OwnerApp,'pcGetLayerGrayed');
  @pcGetSelectedHandle := GetProcAddress(OwnerApp,'pcGetSelectedHandle');
  @pcFigureGetHandle := GetProcAddress(OwnerApp,'pcFigureGetHandle');
  @pcFigureGetName := GetProcAddress(OwnerApp,'pcFigureGetName');
  @pcFigureGetClass := GetProcAddress(OwnerApp,'pcFigureGetClass');
  @pcFigureGetPointCount := GetProcAddress(OwnerApp,'pcFigureGetPointCount');
  @pcFigureGetPoint := GetProcAddress(OwnerApp,'pcFigureGetPoint');
  @pcFigureGetDCPoint := GetProcAddress(OwnerApp,'pcFigureGetDCPoint');
  @pcFigureGetCenter := GetProcAddress(OwnerApp,'pcFigureGetCenter');
  @pcFigureGetRect := GetProcAddress(OwnerApp,'pcFigureGetRect');
  @pcFigureGetRadius := GetProcAddress(OwnerApp,'pcFigureGetRadius');
  @pcFigureGetFontName := GetProcAddress(OwnerApp,'pcFigureGetFontName');
  @pcFigureGetFontBold := GetProcAddress(OwnerApp,'pcFigureGetFontBold');
  @pcFigureGetFontItalic := GetProcAddress(OwnerApp,'pcFigureGetFontItalic');
  @pcFigureGetFontUnderline := GetProcAddress(OwnerApp,'pcFigureGetFontUnderline');
  @pcFigureGetFontStrike := GetProcAddress(OwnerApp,'pcFigureGetFontStrike');
  @pcFigureGetFontSize := GetProcAddress(OwnerApp,'pcFigureGetFontSize');
  @pcFigureGetFontCharset := GetProcAddress(OwnerApp,'pcFigureGetFontCharset');
  @pcFigureGetFontColor := GetProcAddress(OwnerApp,'pcFigureGetFontColor');
  @pcFigureGetPenColor := GetProcAddress(OwnerApp,'pcFigureGetPenColor');
  @pcFigureGetBrushColor := GetProcAddress(OwnerApp,'pcFigureGetBrushColor');
  @pcFigureGetPenStyle := GetProcAddress(OwnerApp,'pcFigureGetPenStyle');
  @pcFigureGetBrushStyle := GetProcAddress(OwnerApp,'pcFigureGetBrushStyle');
  @pcFigureGetRowStyle := GetProcAddress(OwnerApp,'pcFigureGetRowStyle');
  @pcFigureGetPenWidth := GetProcAddress(OwnerApp,'pcFigureGetPenWidth');
  @pcFigureGetInfo := GetProcAddress(OwnerApp,'pcFigureGetInfo');
  @pcFigureGetAngle := GetProcAddress(OwnerApp,'pcFigureGetAngle');
  @pcFigureGetLayerHandle := GetProcAddress(OwnerApp,'pcFigureGetLayerHandle');
  @pcFigureGetDiagonal := GetProcAddress(OwnerApp,'pcFigureGetDiagonal');
  @pcFigureGetLockMove := GetProcAddress(OwnerApp,'pcFigureGetLockMove');
  @pcFigureGetLockModify := GetProcAddress(OwnerApp,'pcFigureGetLockModify');
  @pcFigureGetSelected := GetProcAddress(OwnerApp,'pcFigureGetSelected');
  @pcFigureTestPoint := GetProcAddress(OwnerApp,'pcFigureTestPoint');
  @pcFigureTestRect := GetProcAddress(OwnerApp,'pcFigureTestRect');
  @pcFigureGetRgnHandle := GetProcAddress(OwnerApp,'pcFigureGetRgnHandle');
  @pcFigureSelect := GetProcAddress(OwnerApp,'pcFigureSelect');
  @pcFigureSelectAsRotate := GetProcAddress(OwnerApp,'pcFigureSelectAsRotate');
  @pcFigureDeSelect := GetProcAddress(OwnerApp,'pcFigureDeSelect');
  @pcFigureEdit := GetProcAddress(OwnerApp,'pcFigureEdit');
  @pcFigureMove := GetProcAddress(OwnerApp,'pcFigureMove');
  @pcFigureRotate := GetProcAddress(OwnerApp,'pcFigureRotate');
  @pcFigureRotateByPoint := GetProcAddress(OwnerApp,'pcFigureRotateByPoint');
  @pcFigureMirror := GetProcAddress(OwnerApp,'pcFigureMirror');
  @pcFigureScale := GetProcAddress(OwnerApp,'pcFigureScale');
  @pcFigureScaleByPoint := GetProcAddress(OwnerApp,'pcFigureScaleByPoint');
  @pcFigureSetFontName := GetProcAddress(OwnerApp,'pcFigureSetFontName');
  @pcFigureSetFontBold := GetProcAddress(OwnerApp,'pcFigureSetFontBold');
  @pcFigureSetFontItalic := GetProcAddress(OwnerApp,'pcFigureSetFontItalic');
  @pcFigureSetFontUnderline := GetProcAddress(OwnerApp,'pcFigureSetFontUnderline');
  @pcFigureSetFontStrike := GetProcAddress(OwnerApp,'pcFigureSetFontStrike');
  @pcFigureSetFontSize := GetProcAddress(OwnerApp,'pcFigureSetFontSize');
  @pcFigureSetFontCharset := GetProcAddress(OwnerApp,'pcFigureSetFontCharset');
  @pcFigureSetFontColor := GetProcAddress(OwnerApp,'pcFigureSetFontColor');
  @pcFigureSetPenColor := GetProcAddress(OwnerApp,'pcFigureSetPenColor');
  @pcFigureSetBrushColor := GetProcAddress(OwnerApp,'pcFigureSetBrushColor');
  @pcFigureSetPenStyle := GetProcAddress(OwnerApp,'pcFigureSetPenStyle');
  @pcFigureSetBrushStyle := GetProcAddress(OwnerApp,'pcFigureSetBrushStyle');
  @pcFigureSetRowStyle := GetProcAddress(OwnerApp,'pcFigureSetRowStyle');
  @pcFigureSetPenWidth := GetProcAddress(OwnerApp,'pcFigureSetPenWidth');
  @pcFigureSetPoint := GetProcAddress(OwnerApp,'pcFigureSetPoint');
  @pcFigureSetInfo := GetProcAddress(OwnerApp,'pcFigureSetInfo');
  @pcFigureSetAngle := GetProcAddress(OwnerApp,'pcFigureSetAngle');
  @pcFigureSetLayerHandle := GetProcAddress(OwnerApp,'pcFigureSetLayerHandle');
  @pcFigureSetDiagonal := GetProcAddress(OwnerApp,'pcFigureSetDiagonal');
  @pcFigureSetLockMove := GetProcAddress(OwnerApp,'pcFigureSetLockMove');
  @pcFigureSetLockModify := GetProcAddress(OwnerApp,'pcFigureSetLockModify');
  @pcFigureSetRgnHandle := GetProcAddress(OwnerApp,'pcFigureSetRgnHandle');
  @pcGetDCPoint := GetProcAddress(OwnerApp,'pcGetDCPoint');
  @pcGetDCLen := GetProcAddress(OwnerApp,'pcGetDCLen');
  @pcFigureGrpGetFigureCount := GetProcAddress(OwnerApp,'pcFigureGrpGetFigureCount');
  @pcFigureGrpGetFigureHandle := GetProcAddress(OwnerApp,'pcFigureGrpGetFigureHandle');
  @pcFigureGrpGetCombined := GetProcAddress(OwnerApp,'pcFigureGrpGetCombined');
  @pcFigureGrpSetCombined := GetProcAddress(OwnerApp,'pcFigureGrpSetCombined');
  @pcFigureGrpUngroup := GetProcAddress(OwnerApp,'pcFigureGrpUngroup');
  @pcFigureBlockGetBlockname := GetProcAddress(OwnerApp,'pcFigureBlockGetBlockname');
  @pcFigureGetJoin1 := GetProcAddress(OwnerApp,'pcFigureGetJoin1');
  @pcFigureGetJoin2 := GetProcAddress(OwnerApp,'pcFigureGetJoin2');
  @pcFigureSetJoin1 := GetProcAddress(OwnerApp,'pcFigureSetJoin1');
  @pcFigureSetJoin2 := GetProcAddress(OwnerApp,'pcFigureSetJoin2');
  @pcFigureGetClosed := GetProcAddress(OwnerApp,'pcFigureGetClosed');
  @pcFigureSetClosed := GetProcAddress(OwnerApp,'pcFigureSetClosed');
  @pcFigureGetControlPoint := GetProcAddress(OwnerApp,'pcFigureGetControlPoint');
  @pcFigureSetControlPoints := GetProcAddress(OwnerApp,'pcFigureSetControlPoints');
  @pcFigureGetSegmentType := GetProcAddress(OwnerApp,'pcFigureGetSegmentType');
  @pcFigureSetSegmentType := GetProcAddress(OwnerApp,'pcFigureSetSegmentType');
  @pcFigureInvertArcSegment := GetProcAddress(OwnerApp,'pcFigureInvertArcSegment');
  @pcFigureConvertPLBezier := GetProcAddress(OwnerApp,'pcFigureConvertPLBezier');
  @pcFigureConvertPLPolyline := GetProcAddress(OwnerApp,'pcFigureConvertPLPolyline');
  @pcFigureGetElpALen := GetProcAddress(OwnerApp,'pcFigureGetElpALen');
  @pcFigureGetElpBLen := GetProcAddress(OwnerApp,'pcFigureGetElpBLen');
  @pcFigureGetArcStyle := GetProcAddress(OwnerApp,'pcFigureGetArcStyle');
  @pcFigureSetArcStyle := GetProcAddress(OwnerApp,'pcFigureSetArcStyle');
  @pcFigureInvertArc := GetProcAddress(OwnerApp,'pcFigureInvertArc');
  @pcFigureGetArcSAngle := GetProcAddress(OwnerApp,'pcFigureGetArcSAngle');
  @pcFigureGetArcFAngle := GetProcAddress(OwnerApp,'pcFigureGetArcFAngle');
  @pcFigureSetArcAngles := GetProcAddress(OwnerApp,'pcFigureSetArcAngles');
  @pcFigureGetRichText := GetProcAddress(OwnerApp,'pcFigureGetRichText');
  @pcFigureSetRichText := GetProcAddress(OwnerApp,'pcFigureSetRichText');
  @pcFigureGetPictureName := GetProcAddress(OwnerApp,'pcFigureGetPictureName');
  @pcFigureGetTransparent := GetProcAddress(OwnerApp,'pcFigureGetTransparent');
  @pcFigureSetTransparent := GetProcAddress(OwnerApp,'pcFigureSetTransparent');
  @pcFigureFlipHorz := GetProcAddress(OwnerApp,'pcFigureFlipHorz');
  @pcFigureFlipVert := GetProcAddress(OwnerApp,'pcFigureFlipVert');
  @pcFigureSkewBitmap := GetProcAddress(OwnerApp,'pcFigureSkewBitmap');
  @pcFigureSaveBitmapToFile := GetProcAddress(OwnerApp,'pcFigureSaveBitmapToFile');
  @pcFigureLoadBitmapFromFile := GetProcAddress(OwnerApp,'pcFigureLoadBitmapFromFile');
  @pcFigureGetText := GetProcAddress(OwnerApp,'pcFigureGetText');
  @pcFigureSetText := GetProcAddress(OwnerApp,'pcFigureSetText');
  @pcDrawUserFigureEvent := GetProcAddress(OwnerApp,'pcDrawUserFigureEvent');
  @pcPointInUserFigureEvent := GetProcAddress(OwnerApp,'pcPointInUserFigureEvent');
  @pcDraw := GetProcAddress(OwnerApp,'pcDraw');
  @pcDrawFigures := GetProcAddress(OwnerApp,'pcDrawFigures');
  @pcDrawSelectedFigures := GetProcAddress(OwnerApp,'pcDrawSelectedFigures');
  @pcDrawSelectionPoints := GetProcAddress(OwnerApp,'pcDrawSelectionPoints');
  @pcDrawFigureGuides := GetProcAddress(OwnerApp,'pcDrawFigureGuides');
  @pcSelectAll := GetProcAddress(OwnerApp,'pcSelectAll');
  @pcDeselectAll := GetProcAddress(OwnerApp,'pcDeselectAll');
  @pcInvertSelection := GetProcAddress(OwnerApp,'pcInvertSelection');
  @pcGroupSelection := GetProcAddress(OwnerApp,'pcGroupSelection');
  @pcUngroupSelection := GetProcAddress(OwnerApp,'pcUngroupSelection');
  @pcOrderSelection := GetProcAddress(OwnerApp,'pcOrderSelection');
  @pcRemoveSelection := GetProcAddress(OwnerApp,'pcRemoveSelection');
  @pcRotateSelectionCenter := GetProcAddress(OwnerApp,'pcRotateSelectionCenter');
  @pcRotateSelection := GetProcAddress(OwnerApp,'pcRotateSelection');
  @pcMirrorSelection := GetProcAddress(OwnerApp,'pcMirrorSelection');
  @pcKnifeSelection := GetProcAddress(OwnerApp,'pcKnifeSelection');
  @pcCreateDimLinesOfSelection := GetProcAddress(OwnerApp,'pcCreateDimLinesOfSelection');
  @pcClearDimLinesOfSelection := GetProcAddress(OwnerApp,'pcClearDimLinesOfSelection');
  @pcInterBreakSelection := GetProcAddress(OwnerApp,'pcInterBreakSelection');
  @pcLockSelectionToMove := GetProcAddress(OwnerApp,'pcLockSelectionToMove');
  @pcLockSelectionToModify := GetProcAddress(OwnerApp,'pcLockSelectionToModify');
  @pcInvertArcsOfSelection := GetProcAddress(OwnerApp,'pcInvertArcsOfSelection');
  @pcArrangeArcStyleOfSelection := GetProcAddress(OwnerApp,'pcArrangeArcStyleOfSelection');
  @pcCloseSelectedPolyline := GetProcAddress(OwnerApp,'pcCloseSelectedPolyline');
  @pcOpenSelectedPolyline := GetProcAddress(OwnerApp,'pcOpenSelectedPolyline');
  @pcSimplfySelectedPolyline := GetProcAddress(OwnerApp,'pcSimplfySelectedPolyline');
  @pcNameSelection := GetProcAddress(OwnerApp,'pcNameSelection');
  @pcConvertPLToBezier := GetProcAddress(OwnerApp,'pcConvertPLToBezier');
  @pcConvertPLToPolyline := GetProcAddress(OwnerApp,'pcConvertPLToPolyline');
  @pcFlipImagesOfSelection := GetProcAddress(OwnerApp,'pcFlipImagesOfSelection');
  @pcsetTransparentOfSelection := GetProcAddress(OwnerApp,'pcsetTransparentOfSelection');
  @pcScaleSelection := GetProcAddress(OwnerApp,'pcScaleSelection');
  @pcScaleDrawing := GetProcAddress(OwnerApp,'pcScaleDrawing');
  @pcModifyFontName := GetProcAddress(OwnerApp,'pcModifyFontName');
  @pcModifyFontBold := GetProcAddress(OwnerApp,'pcModifyFontBold');
  @pcModifyFontItalic := GetProcAddress(OwnerApp,'pcModifyFontItalic');
  @pcModifyFontUnderline := GetProcAddress(OwnerApp,'pcModifyFontUnderline');
  @pcModifyFontStrike := GetProcAddress(OwnerApp,'pcModifyFontStrike');
  @pcModifyFontSize := GetProcAddress(OwnerApp,'pcModifyFontSize');
  @pcModifyFontCharset := GetProcAddress(OwnerApp,'pcModifyFontCharset');
  @pcModifyFontColor := GetProcAddress(OwnerApp,'pcModifyFontColor');
  @pcModifyPenColor := GetProcAddress(OwnerApp,'pcModifyPenColor');
  @pcModifyBrushColor := GetProcAddress(OwnerApp,'pcModifyBrushColor');
  @pcModifyPenStyle := GetProcAddress(OwnerApp,'pcModifyPenStyle');
  @pcModifyBrushStyle := GetProcAddress(OwnerApp,'pcModifyBrushStyle');
  @pcModifyRowStyle := GetProcAddress(OwnerApp,'pcModifyRowStyle');
  @pcModifyPenWidth := GetProcAddress(OwnerApp,'pcModifyPenWidth');
  @pcIsTextSelected := GetProcAddress(OwnerApp,'pcIsTextSelected');
  @pcGetSelectionBoundS := GetProcAddress(OwnerApp,'pcGetSelectionBoundS');
  @pcGetDrawingBounds := GetProcAddress(OwnerApp,'pcGetDrawingBounds');
  @pcReDrawSelection := GetProcAddress(OwnerApp,'pcReDrawSelection');
  @pcReDrawSelectionPoints := GetProcAddress(OwnerApp,'pcReDrawSelectionPoints');
  @pcManualRefresh := GetProcAddress(OwnerApp,'pcManualRefresh');
  @pcRefreshSelection := GetProcAddress(OwnerApp,'pcRefreshSelection');
  @pcReselect := GetProcAddress(OwnerApp,'pcReselect');
  @pcGetSurfaceBitmapHandle := GetProcAddress(OwnerApp,'pcGetSurfaceBitmapHandle');
  @pcSelectByPoint := GetProcAddress(OwnerApp,'pcSelectByPoint');
  @pcDoMagicWand := GetProcAddress(OwnerApp,'pcDoMagicWand');
  @pcSelectByFigure := GetProcAddress(OwnerApp,'pcSelectByFigure');
  @pcSelectWithInArea := GetProcAddress(OwnerApp,'pcSelectWithInArea');
  @pcSelectFigure := GetProcAddress(OwnerApp,'pcSelectFigure');
  @pcDeSelectFigure := GetProcAddress(OwnerApp,'pcDeSelectFigure');
  @pcMoveSelection := GetProcAddress(OwnerApp,'pcMoveSelection');
  @pcMoveAll := GetProcAddress(OwnerApp,'pcMoveAll');
  @pcMoveAllSilent := GetProcAddress(OwnerApp,'pcMoveAllSilent');
  @pcDuplicateSelection := GetProcAddress(OwnerApp,'pcDuplicateSelection');
  @pcDuplicateSelectionAsBezier := GetProcAddress(OwnerApp,'pcDuplicateSelectionAsBezier');
  @pcConvertSelectionToBezier := GetProcAddress(OwnerApp,'pcConvertSelectionToBezier');
  @pcArrayRectSelection := GetProcAddress(OwnerApp,'pcArrayRectSelection');
  @pcArrayPolarSelection := GetProcAddress(OwnerApp,'pcArrayPolarSelection');
  @pcMakeSelectionBlock := GetProcAddress(OwnerApp,'pcMakeSelectionBlock');
  @pcBoundSelectedLine := GetProcAddress(OwnerApp,'pcBoundSelectedLine');
  @pcBoundLineToFigures := GetProcAddress(OwnerApp,'pcBoundLineToFigures');
  @pcBoundLinePoint := GetProcAddress(OwnerApp,'pcBoundLinePoint');
  @pcUnBoundLine := GetProcAddress(OwnerApp,'pcUnBoundLine');
  @pcMakeSelectedLinesPolyline := GetProcAddress(OwnerApp,'pcMakeSelectedLinesPolyline');
  @pcWeldIntoPolyline := GetProcAddress(OwnerApp,'pcWeldIntoPolyline');
  @pcOffSetSelection := GetProcAddress(OwnerApp,'pcOffSetSelection');
  @pcClipSelBitmapToSelFigure := GetProcAddress(OwnerApp,'pcClipSelBitmapToSelFigure');
  @pcUnClipSelBitmap := GetProcAddress(OwnerApp,'pcUnClipSelBitmap');
  @pcSaveToFile := GetProcAddress(OwnerApp,'pcSaveToFile');
  @pcLoadFromFile := GetProcAddress(OwnerApp,'pcLoadFromFile');
  @pcInsertBlockwithFileName := GetProcAddress(OwnerApp,'pcInsertBlockwithFileName');
  @pcSetBlockInfo := GetProcAddress(OwnerApp,'pcSetBlockInfo');
  @pcExportAsWmf := GetProcAddress(OwnerApp,'pcExportAsWmf');
  @pcExportAsDxf := GetProcAddress(OwnerApp,'pcExportAsDxf');
  @pcSelectionAsMetaFile := GetProcAddress(OwnerApp,'pcSelectionAsMetaFile');
  @pcDrawingAsMetaFile := GetProcAddress(OwnerApp,'pcDrawingAsMetaFile');
  @pcFigureAsMetaFile := GetProcAddress(OwnerApp,'pcFigureAsMetaFile');
  @pcSelectionAsBmpHandle := GetProcAddress(OwnerApp,'pcSelectionAsBmpHandle');
  @pcSaveAsBitmap := GetProcAddress(OwnerApp,'pcSaveAsBitmap');
  @pcCreatePreviewBitmapHandle := GetProcAddress(OwnerApp,'pcCreatePreviewBitmapHandle');
  @pcDrawToDC := GetProcAddress(OwnerApp,'pcDrawToDC');
  @pcStretchToDC := GetProcAddress(OwnerApp,'pcStretchToDC');
  @pcPrintDrawing := GetProcAddress(OwnerApp,'pcPrintDrawing');
  @pcPrintDrawingAsWmf := GetProcAddress(OwnerApp,'pcPrintDrawingAsWmf');
  @pcPrnStartJob := GetProcAddress(OwnerApp,'pcPrnStartJob');
  @pcPrnDoJob := GetProcAddress(OwnerApp,'pcPrnDoJob');
  @pcPrnEndJob := GetProcAddress(OwnerApp,'pcPrnEndJob');
  @pcPrnAbortJob := GetProcAddress(OwnerApp,'pcPrnAbortJob');
  @pcPrintByTiling := GetProcAddress(OwnerApp,'pcPrintByTiling');
  @pcImportDXF := GetProcAddress(OwnerApp,'pcImportDXF');
  @pcClear := GetProcAddress(OwnerApp,'pcClear');
  @pcCopyToClipBoard := GetProcAddress(OwnerApp,'pcCopyToClipBoard');
  @pcCutToClipBoard := GetProcAddress(OwnerApp,'pcCutToClipBoard');
  @pcSetFieldText := GetProcAddress(OwnerApp,'pcSetFieldText');
  @pcPasteFromClipBoard := GetProcAddress(OwnerApp,'pcPasteFromClipBoard');
  @pcGetLayerNbr := GetProcAddress(OwnerApp,'pcGetLayerNbr');
  @pcFindFigureByName := GetProcAddress(OwnerApp,'pcFindFigureByName');
  @pcLine := GetProcAddress(OwnerApp,'pcLine');
  @pcVertex := GetProcAddress(OwnerApp,'pcVertex');
  @pcPolyLine := GetProcAddress(OwnerApp,'pcPolyLine');
  @pcEllipse := GetProcAddress(OwnerApp,'pcEllipse');
  @pcDrawCircle := GetProcAddress(OwnerApp,'pcDrawCircle');
  @pcArc := GetProcAddress(OwnerApp,'pcArc');
  @pcElpArc := GetProcAddress(OwnerApp,'pcElpArc');
  @pcRectangle := GetProcAddress(OwnerApp,'pcRectangle');
  @pcInsertBitmap := GetProcAddress(OwnerApp,'pcInsertBitmap');
  @pcInsertBitmapHandle := GetProcAddress(OwnerApp,'pcInsertBitmapHandle');
  @pcInsertWMF := GetProcAddress(OwnerApp,'pcInsertWMF');
  @pcImportWMF := GetProcAddress(OwnerApp,'pcImportWMF');
  @pcImportDrawing := GetProcAddress(OwnerApp,'pcImportDrawing');
  @pcTextOut := GetProcAddress(OwnerApp,'pcTextOut');
  @pcGetFigureCustomStream := GetProcAddress(OwnerApp,'pcGetFigureCustomStream');
  @pcSetFigureCustomStream := GetProcAddress(OwnerApp,'pcSetFigureCustomStream');
  @pcGetCustomStream := GetProcAddress(OwnerApp,'pcGetCustomStream');
  @pcSetCustomStream := GetProcAddress(OwnerApp,'pcSetCustomStream');
  @pcPrintPreview := GetProcAddress(OwnerApp,'pcPrintPreview');
  @pcGetSlcPenStyle := GetProcAddress(OwnerApp,'pcGetSlcPenStyle');
  @pcGetSlcPenWidth := GetProcAddress(OwnerApp,'pcGetSlcPenWidth');
  @pcGetSlcPenColor := GetProcAddress(OwnerApp,'pcGetSlcPenColor');
  @pcGetSlcRowStyle := GetProcAddress(OwnerApp,'pcGetSlcRowStyle');
  @pcGetSlcBrushStyle := GetProcAddress(OwnerApp,'pcGetSlcBrushStyle');
  @pcGetSlcBrushColor := GetProcAddress(OwnerApp,'pcGetSlcBrushColor');
  @pcGetSlcFontName := GetProcAddress(OwnerApp,'pcGetSlcFontName');
  @pcGetSlcFontBold := GetProcAddress(OwnerApp,'pcGetSlcFontBold');
  @pcGetSlcFontItalic := GetProcAddress(OwnerApp,'pcGetSlcFontItalic');
  @pcGetSlcFontStrike := GetProcAddress(OwnerApp,'pcGetSlcFontStrike');
  @pcGetSlcFontSize := GetProcAddress(OwnerApp,'pcGetSlcFontSize');
  @pcGetSlcFontColor := GetProcAddress(OwnerApp,'pcGetSlcFontColor');
  @pcGetSlcPolylineClosed := GetProcAddress(OwnerApp,'pcGetSlcPolylineClosed');
  @pcGetSlcImageTransparent := GetProcAddress(OwnerApp,'pcGetSlcImageTransparent');
  @pcGetSlcImageClipped := GetProcAddress(OwnerApp,'pcGetSlcImageClipped');
  @pcGetSlcArcStyle := GetProcAddress(OwnerApp,'pcGetSlcArcStyle');
  @pcGetSlcLineBounded := GetProcAddress(OwnerApp,'pcGetSlcLineBounded');
  @pcCountBlock := GetProcAddress(OwnerApp,'pcCountBlock');
  @pcExecuteTBCommand := GetProcAddress(OwnerApp,'pcExecuteTBCommand');
  @pcGetVersion := GetProcAddress(OwnerApp,'pcGetVersion');
  @pcGetBuildNumber := GetProcAddress(OwnerApp,'pcGetBuildNumber');
  @pcBlockAsMetafile := GetProcAddress(OwnerApp,'pcBlockAsMetafile');
  @pcLockSelChange := GetProcAddress(OwnerApp,'pcLockSelChange');
  @pcUnLockSelChange := GetProcAddress(OwnerApp,'pcUnLockSelChange');
  @pcCenterPage := GetProcAddress(OwnerApp,'pcCenterPage');
  @pcAlignPageDown := GetProcAddress(OwnerApp,'pcAlignPageDown');
  @pcAlignPageUp := GetProcAddress(OwnerApp,'pcAlignPageUp');
  @pcStartBlink := GetProcAddress(OwnerApp,'pcStartBlink');
  @pcStopBlink := GetProcAddress(OwnerApp,'pcStopBlink');
  @pcResumeBlink := GetProcAddress(OwnerApp,'pcResumeBlink');
  @pcIsBlinking := GetProcAddress(OwnerApp,'pcIsBlinking');
  @pcCalibrateLayerScale := GetProcAddress(OwnerApp,'pcCalibrateLayerScale');
  @pccNewDrawing := GetProcAddress(OwnerApp,'pccNewDrawing');
  @pccOpenDrawing := GetProcAddress(OwnerApp,'pccOpenDrawing');
  @pccOpenDrawingFile := GetProcAddress(OwnerApp,'pccOpenDrawingFile');
  @pccSaveDrawing := GetProcAddress(OwnerApp,'pccSaveDrawing');
  @pccSaveAsDrawing := GetProcAddress(OwnerApp,'pccSaveAsDrawing');
  @pccPrintDrawing := GetProcAddress(OwnerApp,'pccPrintDrawing');
  @pccPrintDrawingAsWmf := GetProcAddress(OwnerApp,'pccPrintDrawingAsWmf');
  @pccTestPrinter := GetProcAddress(OwnerApp,'pccTestPrinter');
  @pccExportAs := GetProcAddress(OwnerApp,'pccExportAs');
  @pccImportDxf := GetProcAddress(OwnerApp,'pccImportDxf');
  @pcDoPopUp := GetProcAddress(OwnerApp,'pcDoPopUp');
  @pcExecuteCustomCommand := GetProcAddress(OwnerApp,'pcExecuteCustomCommand');
  @pcExecuteVerbalCommand := GetProcAddress(OwnerApp,'pcExecuteVerbalCommand');
  @pcExitApplication := GetProcAddress(OwnerApp,'pcExitApplication');
  @pcIsUnNamed := GetProcAddress(OwnerApp,'pcIsUnNamed');
end;

end.