delphi - DELPHI XE7 [dcc32 错误] E2250 没有可以使用这些参数调用的“Pos”的重载版本

Question

DELPHI XE7 on win7 32bit 代码：

procedure TForm1.IdMappedPortTCP1Execute(AContext: TIdContext);
begin
if (pos('CONNECT',AContext)<>0) or (pos('GET',AContext)<>0) or (pos('POST',AContext)<>0) or   (pos('HEAD',AContext)<>0)
then
(....)
sleep(100);
end;

错误：

[dcc32 Error] Unit1.pas(49): E2250 There is no overloaded version of 'Pos' that can be called with these arguments

请帮助我如何修复该代码

提前致谢

Answer 1

的参数Pos是两个字符串。这些函数在另一个字符串（第二个参数）中搜索第一次出现的子字符串（第一个参数）。该功能记录在这里：http ://docwiki.embarcadero.com/Libraries/en/System.Pos

您传递AContext的是类型TIdContext，而不是字符串。要修复代码，您需要传递包含要在其中搜索的文本的字符串。