为什么提示不见容的类型？谢谢了

[whitecell]

为什么提示不见容的类型？谢谢了
sStr1是STRING
Ord(PChar(MidStr(sStr1,i,1)));

[rbtliu]

Ord(x)，x只能为Ordinal类型，即顺序类型，它包括integer, character, Boolean, enumerated, subrange 这几种。string是不被支持的

[whitecell]

如何解决啊！！？？？

[htyx]

var
cha:char
begin
cha:=sStr1[i];
ord(cha);
end;