delphi怎样判断字符串里面是否包含指定字符

如：字符串 “软件工具” “服装软件” 怎样盘点这种字符串当中是否包含“软”字.
请高手帮忙.

用POS函数
if POS('软','软件工具')>0 then 有

if Pos('软'，str)>0 then //str为获取要判断的字符串的变量 showmessage('有“软”字包含在字符串中');

pos(sub,str)>0就有

就是用pos(a,b),查b里是否有a，如有，返回a在b里的地位（大年夜1开端），找不到返回0。