Re: Adding an item with a tag using InsertStringTag

Return to index

Author

Message

Sergey Tkachenko

Posted: 05/25/2003 22:43:04

How do you get tag? rv.GetCurrentTag must return 45 after executing this

code.

If not, please send me a source code of simple project reproducing the

problem.

>

> 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.