77
77
/* Note: Page sizes values are given in mils
79
79
double iusPerMil = plotter->GetIUsPerDecimil() * 10.0;
80
wxSize pageSize = aPageInfo.GetSizeMils(); // in mils
83
LTmargin.x = aPageInfo.GetLeftMarginMils() * iusPerMil;
84
LTmargin.y = aPageInfo.GetTopMarginMils() * iusPerMil;
87
RBmargin.x = aPageInfo.GetRightMarginMils() * iusPerMil;
88
RBmargin.y = aPageInfo.GetBottomMarginMils() * iusPerMil;
90
81
EDA_COLOR_T plotColor = plotter->GetColorMode() ? RED : BLACK;
91
82
plotter->SetColor( plotColor );
92
83
plotter->SetCurrentLineWidth( PLOTTER::DEFAULT_LINE_WIDTH );
93
84
WS_DRAW_ITEM_LIST drawList;
86
// Print only a short filename, if aFilename is the full filename
87
wxFileName fn( aFilename );
95
89
// Prepare plot parameters
96
drawList.SetMargins( LTmargin, RBmargin);
97
90
drawList.SetPenSize(PLOTTER::DEFAULT_LINE_WIDTH );
98
91
drawList.SetMilsToIUfactor( iusPerMil );
99
drawList.SetPageSize( pageSize );
100
92
drawList.SetSheetNumber( aSheetNumber );
101
93
drawList.SetSheetCount( aNumberOfSheets );
103
// Print only a short filename, if aFilename is the full filename
105
wxFileName fn( aFilename );
107
drawList.BuildWorkSheetGraphicList( aPageInfo.GetType(), fn.GetFullName(),
108
aSheetDesc, aTitleBlock, plotColor, plotColor );
94
drawList.SetFileName( fn.GetFullName() ); // Print only the short filename
95
drawList.SetSheetName( aSheetDesc );
98
drawList.BuildWorkSheetGraphicList( aPageInfo,
99
aTitleBlock, plotColor, plotColor );
110
101
// Draw item list
111
102
for( WS_DRAW_ITEM_BASE* item = drawList.GetFirst(); item;