CnCommon单元之SameCharCounts、CharCounts【6】
摘要：
// 两个字符串的前面的相同字符数 function SameCharCounts(s1, s2: string): Integer; var Str1, Str2: PChar; begin Result := 1; s1 := s1 + #0; s2 := s2 + #0; Str1 := PC 阅读全文
posted @ 2021-05-13 12:58 YXGust 阅读(129) 评论(0) 推荐(0)
浙公网安备 33010602011771号