Adding an item with a tag using InsertStringTag

Return to index

Author

Message

Lee Boswell

Posted: 05/23/2003 22:05:47

I am trying to add an item in code using the InsertStringTag method. The text

gets addd but the tag doesn't seem to get assigned.

Here is the code. Basically the user highlights some text and clicks a button

to replace the text with an item with the tag property assigned...

procedure TForm1.Button1Click(Sender:TObject);

var

  curseltext: string;

begin

  curseltext := rv.GetSelText;

  rv.InsertStringTag(curseltext,45);

end;

**I assumed that it would insert an item assigning 45 as the tag value. But

when I click on a button to display the tag value it is empty.