在Delphi中，Pos函數用于查找子字符串在給定字符串中的起始位置。其語法如下：
function Pos(const SubStr: string; const Str: string): Integer;
參數：
返回值：
示例用法：
var
Str: string;
SubStr: string;
PosIndex: Integer;
begin
Str := 'Hello, world!';
SubStr := 'world';
PosIndex := Pos(SubStr, Str);
if PosIndex > 0 then
ShowMessage('Found at position: ' + IntToStr(PosIndex))
else
ShowMessage('Not found.');
end;
在上述示例中，Pos(SubStr, Str)函數將返回子字符串"world"在字符串"Hello, world!"中的起始位置，即13。如果子字符串未找到，則返回0。
