2019年10月22日

摘要: uses StrUtils; function ReversePos(SubStr, S: String): Integer; var i : Integer; begin i := Pos(ReverseString(SubStr), ReverseString(S)); if i > 0 the 阅读全文
posted @ 2019-10-22 18:01 岁月寒风 阅读(1456) 评论(0) 推荐(1) 编辑

导航