Re: Scan rve

Return to index

Author

Message

TW

Posted: 08/22/2002 10:20:01

if your document contains tables, then the structure

is recursive ( table cells are documents again ).

To iterate all items:

procedure iterate_recursive( rvdata: TcustomRVFormattedData )

begin

for itemNo := 0 to rvdata.items.count-1 do

case rvdata.getItemStyle( itemNo ) of

    rvsPicture:  {do something with item := rvdata.getItem(itemNo)};

       ....

   rvsTable: begin

       table := TRVTableItemInfo( rvdata.getItem( itemNo ));

       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 begin

                        cell := table.cells[r, c];

iterate_recursive(cell.getRVData );

                 end;

       end; // rvsTable

else

   { do something with text item (itemStyle >=0) }

end; // case

end;

// the top call is:

iterate_recursive( rve.rvData );

> Just a problem:

> How can I find if a control (rvscomponent or an image) exists inside a

> table?

----- Original Message -----

From: "Jeff" <ncjt98@yahoo.com>

Newsgroups: trichview.support

Sent: Thursday, August 22, 2002 8:33 AM

Subject: Scan rve

>

> Hi,

>

> If i want to scan throught the whole rve item. What kind of methods can

apply.

> Cause my application will detect some defined tag for the image will make

> some different with others.

>

> Thanks