The following example reproduces an example with hoverable jump text styles inside tables. The five links in the tables does not unhover when mouse cursor is moving outside an hoverable jump text style (se five last links!)
Code: Select all
procedure TForm1.FormCreate(Sender: TObject);
Var Tab : TRVTableItemInfo;
begin
RichView1.AddNLTag('link1', 4, 0, 'link1');
RichView1.AddNLTag('link2', 4, 0, 'link2');
RichView1.AddNLTag('link3', 4, 0, 'link3');
RichView1.AddNLTag('link4', 4, 0, 'link4');
RichView1.AddNLTag('link5', 4, 0, 'link5');
Tab := TRVTableItemInfo.CreateEx(5, 1, RichView1.RVData);
Tab.Cells[0,0].Clear; Tab.Cells[0,0].AddNLTag('link1', 4, 0, 'link21');
Tab.Cells[1,0].Clear; Tab.Cells[1,0].AddNLTag('link2', 4, 0, 'link22');
Tab.Cells[2,0].Clear; Tab.Cells[2,0].AddNLTag('link3', 4, 0, 'link23');
Tab.Cells[3,0].Clear; Tab.Cells[3,0].AddNLTag('link4', 4, 0, 'link24');
Tab.Cells[4,0].Clear; Tab.Cells[4,0].AddNLTag('link5', 4, 0, 'link25');
RichView1.AddItem('tab', Tab);
RichView1.Format;
end;
Is this a bug? Any hotfix available?
Regards,
STH2010[/code]