outlines Bookmark problem

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

   The following routine works correctly on Adobe reader help file. But when i try it on the ISEDQUICK PDF help file i receive rubbish. The isedquicxkpdf help file produces only 1 outline title that contains illegible characters. But the Adobe reader help file contains ALL LEVEL 0 headings

  id := QPbook.GetFirstOutline;
     begin
     while id > 0 do

  begin
    if StopRunningSwitch = True then
      break;
    Application.ProcessMessages;

    gblbookid := QPbook.OutlineID(id);
    gblbooktitle := QPbook.OutlineTitle(id);
    gblbookpage := QPbook.GetOutlinePage(id);
    GBLBookid := id;
    StatusBar1.Panels[2].Text := 'bookmark no  =  ' + IntToStr(i);
    StatusBar1.Repaint;
         AddBookmark;
       id := QPbook.GetNextOutline(id)  ;
       GBLBookid := id;

  end;

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
rogerad Members Profile Find Members Posts Beginner Joined: 08 Dec 05 Location: Australia Status: Offline Points: 14	Post Options Post Reply Quote rogerad Report Post Thanks(0) Quote Reply Topic: outlines Bookmark problem Posted: 20 Dec 05 at 7:47PM
	The following routine works correctly on Adobe reader help file. But when i try it on the ISEDQUICK PDF help file i receive rubbish. The isedquicxkpdf help file produces only 1 outline title that contains illegible characters. But the Adobe reader help file contains ALL LEVEL 0 headings id := QPbook.GetFirstOutline; begin while id > 0 do begin if StopRunningSwitch = True then break; Application.ProcessMessages; gblbookid := QPbook.OutlineID(id); gblbooktitle := QPbook.OutlineTitle(id); gblbookpage := QPbook.GetOutlinePage(id); GBLBookid := id; StatusBar1.Panels[2].Text := 'bookmark no = ' + IntToStr(i); StatusBar1.Repaint; AddBookmark; id := QPbook.GetNextOutline(id) ; GBLBookid := id; end;
	roger adams