NumberOfCopies: Integer;
The NumberOfCopies property determines the number of document copies.
Sub Main;
Var
MB: IMetabase;
Printer: IGxPrinter;
DocPrint: IGxDocumentPrinter;
PrComment: IGxPrintComment;
PrDesc: IGxPrinterDescription;
Docum: IGxDocument;
i: Integer;
Begin
MB:=MetabaseClass.Active;
Docum:=MB.ItemById("Report").Bind As IGxDocument;
Printer:=GxPrinters.DefaultPrinter;
DocPrint:=Printer As IGxDocumentPrinter;
PrComment:=New GxPrintComment.Create;
Docum.Print(DocPrint,0,0,"");
PrDesc:=PrComment.PrinterDescription;
PrDesc.Description:=DocPrint.Description;
i:=PrDesc.NumberOfCopies;
End Sub Main;
After executing the example the document is printed, and the "i" variable contains the number of copies.
See also: