TMyCAD > Methods

procedure Print(ALayers: array of Integer; UserScale: double = 1.0);

Description:

Print to printer.

Parameter

ALayer: if you want print all layer, please use [], else [1,2,3], or you create array and set layerId that you want print

UserScale:the scale.

Example:

Delphi

//print all shapes in 50% scale.

MyCAD1.Print ([],0.5);

C++ Builder

//print all shapes in 100% scale.

void __fastcall TMainFrm::BitBtn1Click(TObject *Sender)

{

int p[1];

p[0]=NULL;

MyCAD1->Print(p,0,1.0);

}

//print the shapes in 0,1 layers in 100% scale.

void __fastcall TMainFrm::BitBtn1Click(TObject *Sender)

{

int p[2];

p[0]=0; //First Layer Id

p[1]=1; //Second Layer Id

MyCAD1->Print(p,2,1.0);

}