RichViewEditClean.SearchTextW(IntToStr(note_cnt), ) RichViewEditClean.InsertText(IntToStr(note_cnt), TRUE) RichViewEditClean.DeleteItems(notes_i, 1) RichViewEditClean.SetSelectionBounds(notes_i, RichViewEditClean.GetOffsBeforeItem(notes_i), notes_i, RichViewEditClean.GetOffsBeforeItem(notes_i)) Remove footnote from RichViewEditClean.GetItem(notes_i) RichViewEditClean.Add(IntToStr(note_cnt),1) ĪddNote(RichViewEditClean.GetItem(notes_i) as TCustomRVNoteItemInfo) RichViewEditClean.AddCheckpoint('fn' + IntToStr(note_cnt), True, 'fn' + IntToStr(note_cnt)) If FootNoteBool = False then RichViewEditClean.AppendFrom(footnoteRVE) If RichViewEditClean.GetItem(notes_i) is TCustomRVNoteItemInfo then (I would love to renumber them per section but understand if that would get really complicated.)įor notes_i := 0 to RichViewEditClean.ItemCount-1 do Once all items have been processed add that to RVE-topic? Thoughts?īy the way most of this is already done mainly need to move footnotes to end and have them still be connected to their numbers. Do I just run through all the "items" check if it has a footnote and then add it to RVE-footnote. My concern is how to go through all the footnotes in that topic section.
I could load the footnotes into another RVE-footnote or RTFStream then add that content to the end of RVE-topic. So here in RVE-topic I need to take the footnotes and move them to the end. I've already broken down the RVE-whole into topic sections now that topic section is loaded in RVE-topic and then further modified then saved to an SQL database.
RVE-whole has the whole document with various areas like this indicates a new topic section. So I'm working with two RichViewEdits lets call them RVE-whole and RVE-topic We need to then add those footnotes to the end of the topic section. Now each topic section may have footnotes. Parse through various parts that will be future topic sections. We bring in an RTF document to RichViewEdit. Basically convert all footnotes to end notes and not undo able it needs to be permanent.
0 kommentar(er)
