{ PDF object is supposed to be created         }
PDF.BeginDoc; { 1st page is created, index = 0 }
PDF.NewPage;  { add 2nd page, index = 1        }
PDF.NewPage;  { add 3rd page, index = 2        }
i := PDF.GetCurrentPageIndex;
{ now i must be equal to 2                     }
PDF.EndDoc;

// PDF object is supposed to be created
PDF->BeginDoc; // 1st page is created, index = 0
PDF->NewPage(); // add 2nd page, index = 1
PDF->NewPage(); // add 3rd page, index = 2
LONG i = PDF.GetCurrentPageIndex();
// now i must be equal to 2
PDF.EndDoc();

// PDF object is supposed to be created
PDF.BeginDoc(); // 1st page is created, index = 0
PDF.NewPage(); // add 2nd page, index = 1
PDF.NewPage(); // add 3rd page, index = 2
long i = PDF.GetCurrentPageIndex();
// now i must be equal to 2
PDF.EndDoc();

' PDF object is supposed to be created
PDF.BeginDoc ' 1st page is created, index = 0
PDF.NewPage ' add 2nd page, index = 1
PDF.NewPage ' add 3rd page, index = 2
i = PDF.GetCurrentPageIndex
' now i must be equal to 2
PDF.EndDoc