在Crystal Reports的文本字符串中格式化特定发现的单词

Question

我有一个单词列表，我通过表中的“Notes”字段进行搜索，当我在Crystal Report中显示该Notes字段时，我希望以某种方式突出显示（仅更改字体颜色）笔记文本字符串中特定的标记字。

例如： 单词列表：Joe，Sarah，Amy，Jeff 注意文字：“我停下来和Joe谈话检查帐户状态，Amy打招呼。”

预期结果：注意文本在报告中以红色字显示“Joe”和“Amy”。

我试过使用RTF和HTML在属性中的文本解释参数，在那里我可以成功地格式化注释文本到这些文本输出。但是，我仍然不知道正确的代码来隔离和格式化我的列表中的特定单词，特别是如果我的单词有多于一个单词出现在字段文本中。

在此先感谢您提供的任何帮助！

Answer 1

我做了一个类似于几年前的东西：

StringVar SearchText := "has"; 
StringVar Htm1 := "<b>"; 
StringVar Htm2 := "</b>"; 
StringVar Result := ""; 
StringVar Temp := ""; 
NumberVar Start := 1; 
NumberVar Ln := Len(SearchText); 
NumberVar Loc := Instr({@TextField}, SearchText); 
While Loc > 0 Do ( 
    Temp := Mid({@TextField}, Start, Loc - Start) + Htm1 + Mid({@TextField}, Loc, Ln) & Htm2; 
    Result := Result + Temp; 
    Start := Loc + Ln; 
    Loc := Instr(Start, {@TextField}, SearchText); 
); 
Temp := Mid({@TextField}, Start); 
Result := Result + Temp; 
Result 

在这种情况下，我正在寻找呼吁@TextField在SEARCHTEXT价值和上午加粗值的字段。可能不是最有效的代码，但它的工作原理。

Answer 2

我知道这是旧的，但我发现它寻找我遇到的问题。回答的代码有效，但对我来说似乎有点混乱，而且我需要能够提供一个单词列表来突出显示。这是我想出来的。

Local Stringvar Array searchwords:=MakeArray("Joe", "Sarah", "Amy"); 
local stringvar notes:={Notes}; 
local numbervar i; 
for i:=1 to count(searchwords) do (
    notes:=replace(notes,searchwords[i],"<font color='red'>" & searchwords[i] & "</font>",1,-1,1); 
); 
notes 

需要注意的唯一的事情，就是这个会发现结果时的搜索词是一个较大单词的一部分 - 即“工作”将在“车间”加粗。

虽然这对我们的需要，因为我们希望“工作”，“工作”，“工作”等所有亮点，水晶报告不支持正则表达式是一个相当大的缺点。