function AnsiStartsStr(const ASubText, AText: string): Boolean; begin Result := AnsiSameStr(ASubText, Copy(AText, 1, Length(ASubText))); end;
ASubText 是 ‘‘ 时,也是 返回 True。因为
Copy(AText, 1, Length(ASubText)) 返回 ‘‘
时间: 2024-10-12 12:21:37
function AnsiStartsStr(const ASubText, AText: string): Boolean; begin Result := AnsiSameStr(ASubText, Copy(AText, 1, Length(ASubText))); end;
ASubText 是 ‘‘ 时,也是 返回 True。因为
Copy(AText, 1, Length(ASubText)) 返回 ‘‘