Re: Copying Tables

Return to index

Author

Message

Sergey Tkachenko

Posted: 09/08/2004 22:58:58

You can put this code in OnExecute event for this action:

var

  rve: TCustomRichViewEdit;

  item: TCustomRVItemInfo;

  ItemNo: Integer;

  table: TRVTableItemInfo;

begin

  if not RichViewEdit1.GetCurrentItemEx(TRVTableItemInfo, rve, item) then

    exit;

  table := TRVTableItemInfo(item);

  ItemNo := table.GetMyItemNo;

  rve.SetSelectionBounds(ItemNo, 0, ItemNo, 1);

  rve.Invalidate;

end;

>

> Thanks. Can you suggest code so that when 'select - select table' is

chosen,

> method 2 is implemented?

>

>

> "Sergey Tkachenko" <[email protected]> wrote:

> >There are two different ways to select table:

> >1) multicell selection (with mouse: starting from one cell and ending

with

> >another)

> >2) as a whole (with mouse: start to the left of table and end to the

right,

> >or vice versa).

> >

> >Table | Select | Select Table uses the first method.

> >Copying multicell selection in the Clipboard is not implemented yet.

Planned

> >for the next major version.

>