Re: rve.InsertItem('table_name', table_variable);

Return to index

Author

Message

Sergey Tkachenko

Posted: 12/25/2002 22:53:02

The function below searches for table object with the specified name.

function FindTableByName(rv: TCustomRichView; const TableName: String):

TRVTableItemInfo;

var i: Integer;

begin

  Result := nil;

  for i := 0 to rv.ItemCount-1 do

    if (rv.GetItemStyle(i)=rvsTable) and (rv.GetItemText(i)=TableName) then

begin

      Result := TRVTableItemInfo(rv.GetItem(i));

      exit;

    end;

end;

Call:

table := FindTableByName(rve, 'table_name');

This function does not search for nested tables.

>

> could I use table_name to get in some variable of the same type as

table_variable

> the table which was inserted with the next line

>

> rve.InsertItem('table_name', table_variable);