FlattenAnnot still opaque in v10.13

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   The FlattenAnnot function in version 10.13 still create an opaque bar when use with the renderto.. function.
The codes I use are as follows:

  iPageCount:= Qp.PageCount;
  With Qp do
    begin
      For i:= 1 to iPagecount do
        begin
          QP.SelectPage(i);
          iAnnotCount:= qp.AnnotationCount;
          for j:= iAnnotCount downto 1 do
            begin
              s1:= qp.GetAnnotStrProperty(j, 101);
              If sm.equalIC(s1,'Highlight') then
                begin
                  retval:= qp.FlattenAnnot(j, 0);
                  if retval = 0 then
                    ShowMessage(Format('Annotation No. %d cannot be flattened',[j]));
                end;
            end;
        end;
    end; 

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
kk aw Members Profile Find Members Posts Team Player Joined: 02 Feb 10 Location: Malaysia Status: Offline Points: 36	Post Options Post Reply Quote kk aw Report Post Thanks(0) Quote Reply Topic: FlattenAnnot still opaque in v10.13 Posted: 28 Mar 14 at 12:36AM
	The FlattenAnnot function in version 10.13 still create an opaque bar when use with the renderto.. function. The codes I use are as follows: iPageCount:= Qp.PageCount; With Qp do begin For i:= 1 to iPagecount do begin QP.SelectPage(i); iAnnotCount:= qp.AnnotationCount; for j:= iAnnotCount downto 1 do begin s1:= qp.GetAnnotStrProperty(j, 101); If sm.equalIC(s1,'Highlight') then begin retval:= qp.FlattenAnnot(j, 0); if retval = 0 then ShowMessage(Format('Annotation No. %d cannot be flattened',[j])); end; end; end; end;

AndrewC Members Profile Find Members Posts Moderator Group Joined: 08 Dec 10 Location: Geelong, Aust Status: Offline Points: 841	Post Options Post Reply Quote AndrewC Report Post Thanks(0) Quote Reply Posted: 28 Mar 14 at 6:12AM
	kk aw, Have you tried opening your PDF file in Acrobat ? Your code is working for me if I open the flattened PDF in Acrobat. The Highlight annotation uses transparency object and will require the new rendering engine to render correctly if you use any of the Debenu Quick PDF Library rendering functions such as RenderPageToFile etc... ret = QP.SetDPLRFileName(@"DebenuPDFRendererDLL1013.dll"); SelectRenderer(3); The extra DLL can be found in the "Rendering and Printing Add-On" directory in your Debenu Quick PDF Library 10.13 installation directory. Andrew.

kk aw Members Profile Find Members Posts Team Player Joined: 02 Feb 10 Location: Malaysia Status: Offline Points: 36	Post Options Post Reply Quote kk aw Report Post Thanks(0) Quote Reply Posted: 28 Mar 14 at 7:30AM
	Can you provide the code example for Delphi. I am not sure of the DebenuPDFRendererDLL1013.dll function.