LONG PDFOUTLINENODE_Count { get; } |
This property returns the number of direct children for a node, but not the total number of children in the node subtree (unless all are direct).
Equivalent in new interface: IPDFDocument4::GetOutlineChildCount.
{ PDF object is supposed to be created } PDF.BeginDoc; lAction := PDF.CreateGoToPageAction(0, 0); ind1 := PDF.PDFOUTLINES_Add(0, 'Outline 1', lAction, charsetANSI_CHARSET); ind2 := PDF.PDFOUTLINES_AddChild(ind1, 'Outline 1.1', lAction, charsetANSI_CHARSET); ind3 := PDF.PDFOUTLINES_AddChild(ind1, 'Outline 1.2', lAction, charsetANSI_CHARSET); ind4 := PDF.PDFOUTLINES_AddChild(ind2, 'Outline 1.1.1', lAction, charsetANSI_CHARSET); PDF.SetCurrentPDFOutlineNode(ind1); cnt := PDF.PDFOUTLINENODE_Count; { cnt = 2 } PDF.EndDoc;
// PDF object is supposed to be created PDF->BeginDoc(); LONG lAction = PDF->CreateGoToPageAction(0, 0); LONG ind1 = PDF->PDFOUTLINES_Add(0, "Outline 1", lAction, charsetANSI_CHARSET); LONG ind2 = PDF->PDFOUTLINES_AddChild(ind1, "Outline 1.1", lAction, charsetANSI_CHARSET); LONG ind3 = PDF->PDFOUTLINES_AddChild(ind1, "Outline 1.2", lAction, charsetANSI_CHARSET); LONG ind4 = PDF->PDFOUTLINES_AddChild(ind2, "Outline 1.1.1", lAction, charsetANSI_CHARSET); PDF->SetCurrentPDFOutlineNode(ind1) LONG cnt = PDF->PDFOUTLINENODE_Count; //cnt == 2 PDF->EndDoc();
// PDF object is supposed to be created PDF.BeginDoc(); long lAction = PDF.CreateGoToPageAction(0, 0); long ind1 = PDF.PDFOUTLINES_Add(0, "Outline 1", lAction, TxFontCharset.charsetANSI_CHARSET); long ind2 = PDF.PDFOUTLINES_AddChild(ind1, "Outline 1.1", lAction, TxFontCharset.charsetANSI_CHARSET); long ind3 = PDF.PDFOUTLINES_AddChild(ind1, "Outline 1.2", lAction, TxFontCharset.charsetANSI_CHARSET); long ind4 = PDF.PDFOUTLINES_AddChild(ind2, "Outline 1.1.1", lAction, TxFontCharset.charsetANSI_CHARSET); PDF.SetCurrentPDFOutlineNode(ind1) long cnt = PDF.PDFOUTLINENODE_Count; //cnt == 2 PDF.EndDoc();
' PDF object is supposed to be created PDF.BeginDoc lAction = PDF.CreateGoToPageAction(0, 0) ind1 = PDF.PDFOUTLINES_Add(0, "Outline 1", lAction, 0) ind2 = PDF.PDFOUTLINES_AddChild(ind1, "Outline 1.1", lAction, 0) ind3 = PDF.PDFOUTLINES_AddChild(ind1, "Outline 1.2", lAction, 0) ind4 = PDF.PDFOUTLINES_AddChild(ind2, "Outline 1.1.1", lAction, 0) PDF.SetCurrentPDFOutlineNode ind1 cnt = PDF.PDFOUTLINENODE_Count ' cnt = 2 PDF.EndDoc