Re: Checkmarks inside  tables. how to get CheckPointData . ?

Return to index

Author

Message

del

Posted: 07/09/2002 8:53:22

Thanks a lot Sergey.

Your example solved a lot of issues. Your support is excellent.

thanks,

"Sergey Tkachenko" <[email protected]> wrote in message

news:[email protected]...

> Yes, checkpoints in tables are not included in the list of checkpoints in

> the document, so they cannot be found by

> GetFirstCheckPoint/GetNextCheckpoint.

> In order to get all checkpoints including in document, you need to iterate

> through all items, checking their checkpoints.

> The example is below.

>

> procedure EnumCheckpoints(RVData: TCustomRVData);

> var i,r,c: Integer;

>   table: TRVTableItemInfo;

>   cpdata: TCheckpointData;

> begin

>   for i := 0 to RVData.Items.Count-1 do begin

>     cpdata := RVData.GetItemCheckpoint(i);

>     if cpdata<>nil then begin

>       // processing the checkpoint

>       // RVData.GetCheckpointInfo();

>     end;

>     if RVData.GetItemStyle(i)=rvsTable then begin

>       table := TRVTableItemInfo(RVData.GetItem(i));

>       for r := 0 to table.Rows.Count-1 do

>         for c := 0 to table.Rows[r].Count-1 do

>           if table.Cells[r,c]<>nil then

>             EnumCheckpoints(table.Cells[r,c].GetRVData);

>     end;

>   end;

> end;

>

> call it as:

>

> EnumCheckpoints(RichView.RVData);

>

>

>

> > How can I get Checkpoint data of all Checkpoints in a file (both

> Checkpoints

> > inside tables and outside tables) ?

> >

> > The problem is like this, I implemented checkmark and hyperlinking to

> those

> > checkmarks with manipulation of Tags of items and checkmarks. I can also

> > save the file to HTML/RVF/RTF, and all the bookmarking and

corresponding

> > hyperlinks are saved into HTML (I am converting the tags to

corresponding

> > html tags at OnURLneeded etc).

> >

> > It is working perfectly with hyprlinks outside the tables of the file.

But

> > when I create a hyperlink inside a table all info. reg. hyprlinks are

lost

> > and even the text of hyperlinks are not saved into file.

> >

> > How can I correc the issue.

> >

> > My code is like this, getting all bookmark info. from the file, so that

> the

> > user can select hyperlinks from an Insert hyperlink form.

> > ====

> > procedure frmXXX.mitInsertHyperLinkClick(Sender: TObject);

> >   var

> >     vCPData            : TCheckPointData;

> >     vTempCPData   : TCheckPointData

> >    ......

> > begin

> >   ....

> >   vTempCPData := RichEditEmailText.GetFirstCheckPoint; // here I am

> getting

> > vTempCPData as NIL.

> >

> >   while vTempCPData<>nil do

> >   begin

> >     ....

> >   end

> > ....

> > end;

> >

> > In the above code I am getting vCPData as NIL.

> >

> > But when I am using the methodGetCurrentCheckPoint at a cursor position

it

> > is returning the correct CheckPoint data.

> >

> > thanks in advance.

> >

> >

> >

> >

>

>