移除目录的边框线,wps显示目录不再有边框
This commit is contained in:
@@ -28,6 +28,7 @@ function TSToc.LinkAnnot(dst: PdfDestination);
|
|||||||
begin
|
begin
|
||||||
annot := tspage_.PdfPage.CreateLinkAnnot(rect_, dst);
|
annot := tspage_.PdfPage.CreateLinkAnnot(rect_, dst);
|
||||||
annot.LinkAnnotSetHighlightMode(TSPdfEnumerations.ANNOT_NO_HIGHTLIGHT);
|
annot.LinkAnnotSetHighlightMode(TSPdfEnumerations.ANNOT_NO_HIGHTLIGHT);
|
||||||
|
annot.LinkAnnotSetBorderStyle(0, 0, 0);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TSToc.AddPageNumber(page: TSPage);
|
function TSToc.AddPageNumber(page: TSPage);
|
||||||
|
|||||||
Reference in New Issue
Block a user