字符串与listview之间显示选择的关系

Question

我想实现
例如一个字符串a/b/c/d与一个表中的字段值比较,此表中的字段值均在listview中显示
说明:字符串的内容均是从表中的字段取得,只不过是加了/,表中的字段值为a,b,c,d,e
如果有则在listview显示的字符前打上对号
请高手多多帮忙

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
var
  s,ss:string;
  str:TStrings;
  i,j,m:Integer;
begin
  s:='a/b/c/d/';
  str:=TStringList.Create;
  str.Clear
  ExtractStrings(['/'],[],PChar(s),str);
  i:=self.ListView1.Items.Count;
  for j:=0 to i-1 do
  begin
    ss:=self.ListView1.Items[j].Caption;
    m:=str.IndexOf(ss);
    if m>=0 then
      self.ListView1.Items[j].Caption:='√'+ss;
  end;
end;