Question

delphi 怎样 判断 字符串是否包含

Answer 1

在Delphi中字符串查找 函数 Delphi提供的字符串函数里有一个Pos函数，它的定义是：
function Pos(Substr: string; S: string): Integer;
它的作用是在字符串S中查找字符串Substr，返回值是Substr在S中第一次出现的位置，如果没有找到，返回值为0。 使用pos函数来查找字符第一次出现的位置
var str1:string;
i,j:integer;
begin
str1:='dsf4654f6<ds>ad';
j:=pos('<',str1);//在字符串str1中查找"<"
if j<>0 then //得到的j是字符串中出现的位置，是整型
showmessage('<'+'在第'+inttostr(j)+'个位置'); //第十个位置
end;