{"id":101,"date":"2014-08-24T02:04:23","date_gmt":"2014-08-23T18:04:23","guid":{"rendered":"http:\/\/blog.qdac.cc\/?p=101"},"modified":"2014-08-24T02:04:23","modified_gmt":"2014-08-23T18:04:23","slug":"delphi%e5%ae%9e%e7%8e%b0%e7%9a%84sunday%e5%ad%97%e7%ac%a6%e4%b8%b2%e6%90%9c%e7%b4%a2%e7%ae%97%e6%b3%95","status":"publish","type":"post","link":"https:\/\/blog.qdac.cc\/?p=101","title":{"rendered":"Delphi\u5b9e\u73b0\u7684Sunday\u5b57\u7b26\u4e32\u641c\u7d22\u7b97\u6cd5"},"content":{"rendered":"<pre class=\"lang:delphi decode:true \">type\r\n  TBMKey=record\r\n    Length:Integer;\r\n    Offsets:array[0..255] of Integer;\r\n    ps:PAnsiChar;\r\n  end;\r\nprocedure InitKeyDistance(var AKey:TBMKey);\r\nvar\r\n  I:Integer;\r\nbegin\r\nAKey.Length:=StrLen(AKey.ps);\r\nfor I := 0 to 255 do\r\n  AKey.Offsets[I]:=AKey.Length;\r\nfor I := 0 to AKey.Length-1 do\r\n  AKey.Offsets[Ord(AKey.ps[I])]:=AKey.Length-I-1;\r\nend;\r\nfunction SundayStrStrA(s:PAnsiChar;const Key:TBMKey):PAnsiChar;\r\nvar\r\n  i,pos,ls:Integer;\r\nbegin\r\nif s=nil then\r\n  Result:=nil\r\nelse if Key.ps=nil then\r\n  Result:=s\r\nelse\r\n  begin\r\n  ls:=StrLen(s);\r\n  Result:=nil;\r\n  pos:=1;\r\n  while pos&lt;=ls-Key.Length do\r\n    begin\r\n    I:=pos-1;\r\n    while I-pos+1&lt;Key.Length do\r\n      begin\r\n      if s[I]&lt;&gt;Key.ps[I-pos+1] then\r\n        Break;\r\n      Inc(I);\r\n      end;\r\n    if i-pos+1=Key.Length then\r\n      begin\r\n      Result:=s+pos-1;\r\n      Break;\r\n      end\r\n    else\r\n      Inc(pos,Key.Offsets[Ord(s[pos+Key.Length-1])]+1);\r\n    end;\r\n  end;\r\nend;<\/pre>\n<p><span style=\"color: #454545;\">\u7528\u6cd5\uff1a<\/span><\/p>\n<pre class=\"lang:delphi decode:true \">var\r\n    AKey:TBMKey;\r\n...\r\nbegin\r\nAKey.ps:=\u8981\u67e5\u627e\u7684\u5b50\u5b57\u7b26\u4e32\r\nInitKeyDistance(AKey);\r\nSundayStrStrA(\u8981\u67e5\u627e\u7684\u5b57\u7b26\u4e32\uff0cAKey);\r\n...\r\nend;<\/pre>\n<p>&nbsp;<\/p>\n","protected":false},"excerpt":{"rendered":"<p>type TBMKey=record L [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"site-sidebar-layout":"default","site-content-layout":"","ast-site-content-layout":"default","site-content-style":"default","site-sidebar-style":"default","ast-global-header-display":"","ast-banner-title-visibility":"","ast-main-header-display":"","ast-hfb-above-header-display":"","ast-hfb-below-header-display":"","ast-hfb-mobile-header-display":"","site-post-title":"","ast-breadcrumbs-content":"","ast-featured-img":"","footer-sml-layout":"","ast-disable-related-posts":"","theme-transparent-header-meta":"","adv-header-id-meta":"","stick-header-meta":"","header-above-stick-meta":"","header-main-stick-meta":"","header-below-stick-meta":"","astra-migrate-meta-layouts":"default","ast-page-background-enabled":"default","ast-page-background-meta":{"desktop":{"background-color":"var(--ast-global-color-4)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"tablet":{"background-color":"","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"mobile":{"background-color":"","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""}},"ast-content-background-meta":{"desktop":{"background-color":"var(--ast-global-color-5)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"tablet":{"background-color":"var(--ast-global-color-5)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"mobile":{"background-color":"var(--ast-global-color-5)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""}},"footnotes":""},"categories":[8],"tags":[26,25],"class_list":["post-101","post","type-post","status-publish","format-standard","hentry","category-delphi","tag-sunday","tag-25"],"views":3378,"_links":{"self":[{"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/posts\/101","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=101"}],"version-history":[{"count":1,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/posts\/101\/revisions"}],"predecessor-version":[{"id":102,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/posts\/101\/revisions\/102"}],"wp:attachment":[{"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=101"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=101"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=101"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}