{"id":1820,"date":"2022-06-28T18:28:58","date_gmt":"2022-06-28T10:28:58","guid":{"rendered":"https:\/\/www.citerp.com.tw\/citwp2\/?p=1820"},"modified":"2022-10-13T15:38:41","modified_gmt":"2022-10-13T07:38:41","slug":"delphi-1","status":"publish","type":"post","link":"https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-1\/","title":{"rendered":"Delphi\u9650\u5236Edit\u53ea\u80fd\u8f38\u5165\u6578\u5b57"},"content":{"rendered":"\n<p>\u5982\u4f55\u5728<strong>Delphi<\/strong>\u9650\u5236Edit\u53ea\u80fd\u8f38\u5165\u6578\u5b57\uff0c\u5927\u90e8\u5206\u7684\u505a\u6cd5\u662f\u5728Edit\u7684<strong>OnKeyPress<\/strong>\u4e8b\u4ef6\u4e2d\u52a0\u5165\u9650\u5236\u5f0f\uff0c\u63a5\u4e0b\u4f86\u5c31\u70ba\u5927\u5bb6\u4ecb\u7d39\u5982\u4e0b\u3002<\/p>\n\n\n\n<figure class=\"wp-block-image size-full\"><img loading=\"lazy\" decoding=\"async\" width=\"128\" height=\"128\" src=\"https:\/\/www.citerp.com.tw\/citwp2\/wp-content\/uploads\/2022\/06\/delphi-1-1-1.png\" alt=\"\" class=\"wp-image-1823\"\/><\/figure>\n\n\n\n<script async=\"\" src=\"https:\/\/pagead2.googlesyndication.com\/pagead\/js\/adsbygoogle.js\"><\/script>\n\t<ins class=\"adsbygoogle\" style=\"display:block\" data-ad-client=\"ca-pub-7536970353732438\" data-ad-slot=\"2906002114\" data-ad-format=\"auto\" data-full-width-responsive=\"true\"><\/ins>\n<script>\n\t(adsbygoogle = window.adsbygoogle || []).push({});\n<\/script>\n\n\n\n<p> \ud83d\udc47<strong>\u53ea\u80fd\u8f38\u5165\u6578\u5b57<\/strong> <\/p>\n\n\n\n<pre class=\"wp-block-code\"><code>procedure Tmainform.editkeypress(sender:tobject;var key: char );\nvar\n\u3000\u3000Uflag: integer;\nbegin\n\u3000\u3000Uflag:=Tedit(sender).Tag;\n\u3000\u3000if (not (key in &#91;'1'..'9'])) and (not (key=#8)) then key:=#0;\nend;<\/code><\/pre>\n\n\n\n<p> \ud83d\udc47<strong>\u53ef\u4ee5\u8f38\u5165\u6578\u5b57\uff0c\u4e26\u4e14\u53ef\u4ee5\u4f7f\u7528\u9000\u683c\u522a\u9664\u6578\u5b57\uff0c\u53ef\u4ee5\u4f7f\u7528\u65b7\u884c\u7b26\u865f<\/strong><\/p>\n\n\n\n<pre class=\"wp-block-code\"><code>procedure TfrmPaperCO_EVE.editKeyPress(Sender: TObject; var Key: Char);\nbegin\n  case Key of\n    '0'..'9', #8, #13, #27, '.' : ;\n    else\n    begin\n      MessageBox(Handle,'\u8acb\u8f38\u5165\u6578\u5b57',PChar('\u8f38\u5165\u932f\u8aa4'), MB_OK + MB_ICONINFORMATION);\n      Key := #0;\n    end;\n  end;\nend;<\/code><\/pre>\n\n\n\n<hr class=\"wp-block-separator\"\/>\n\n\n\n<p>\ud83d\udc49<strong><span style=\"color:#ff0080\" class=\"has-inline-color\"><a href=\"https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-excel-1\/\" target=\"_blank\" rel=\"noreferrer noopener\">Delphi Excel \u64cd\u63a7\u65b9\u6cd5<\/a><\/span><\/strong><\/p>\n\n\n\n<p>\ud83d\udc49<strong><span style=\"color:#ff0080\" class=\"has-inline-color\"><a href=\"https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-1\/\" target=\"_blank\" rel=\"noreferrer noopener\">Delphi\u9650\u5236Edit\u53ea\u80fd\u8f38\u5165\u6578\u5b57<\/a><\/span><\/strong><\/p>\n\n\n\n<p>\ud83d\udc49<strong><span style=\"color:#ff0080\" class=\"has-inline-color\"><a href=\"https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-2\/\" target=\"_blank\" rel=\"noreferrer noopener\">Delphi \u9375\u503cASCII\u5c0d\u7167\u5927\u5168 (\u5305\u62ec\u6ed1\u9f20\u53ca\u9375\u76e4)<\/a><\/span><\/strong><\/p>\n","protected":false},"excerpt":{"rendered":"<p>\u5982\u4f55\u5728Delphi\u9650\u5236Edit\u53ea\u80fd\u8f38\u5165\u6578\u5b57\uff0c\u5927\u90e8\u5206\u7684\u505a\u6cd5\u662f\u5728Edit\u7684OnKeyPress\u4e8b\u4ef6\u4e2d\u52a0\u5165\u9650\u5236\u5f0f\uff0c\u63a5 &#8230; <a title=\"Delphi\u9650\u5236Edit\u53ea\u80fd\u8f38\u5165\u6578\u5b57\" class=\"read-more\" href=\"https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-1\/\" aria-label=\"\u66f4\u591a\u95dc\u65bc Delphi\u9650\u5236Edit\u53ea\u80fd\u8f38\u5165\u6578\u5b57\">\u95b1\u8b80\u66f4\u591a<\/a><\/p>\n","protected":false},"author":1,"featured_media":1823,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"qubely_global_settings":"","qubely_interactions":"","footnotes":""},"categories":[9],"tags":[36],"class_list":["post-1820","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-program","tag-delphi"],"qubely_featured_image_url":{"full":["https:\/\/www.citerp.com.tw\/citwp2\/wp-content\/uploads\/2022\/06\/delphi-1-1-1.png",128,128,false],"landscape":["https:\/\/www.citerp.com.tw\/citwp2\/wp-content\/uploads\/2022\/06\/delphi-1-1-1.png",128,128,false],"portraits":["https:\/\/www.citerp.com.tw\/citwp2\/wp-content\/uploads\/2022\/06\/delphi-1-1-1.png",128,128,false],"thumbnail":["https:\/\/www.citerp.com.tw\/citwp2\/wp-content\/uploads\/2022\/06\/delphi-1-1-1.png",128,128,false],"medium":["https:\/\/www.citerp.com.tw\/citwp2\/wp-content\/uploads\/2022\/06\/delphi-1-1-1.png",128,128,false],"medium_large":["https:\/\/www.citerp.com.tw\/citwp2\/wp-content\/uploads\/2022\/06\/delphi-1-1-1.png",128,128,false],"large":["https:\/\/www.citerp.com.tw\/citwp2\/wp-content\/uploads\/2022\/06\/delphi-1-1-1.png",128,128,false],"1536x1536":["https:\/\/www.citerp.com.tw\/citwp2\/wp-content\/uploads\/2022\/06\/delphi-1-1-1.png",128,128,false],"2048x2048":["https:\/\/www.citerp.com.tw\/citwp2\/wp-content\/uploads\/2022\/06\/delphi-1-1-1.png",128,128,false],"qubely_landscape":["https:\/\/www.citerp.com.tw\/citwp2\/wp-content\/uploads\/2022\/06\/delphi-1-1-1.png",128,128,false],"qubely_portrait":["https:\/\/www.citerp.com.tw\/citwp2\/wp-content\/uploads\/2022\/06\/delphi-1-1-1.png",128,128,false],"qubely_thumbnail":["https:\/\/www.citerp.com.tw\/citwp2\/wp-content\/uploads\/2022\/06\/delphi-1-1-1-128x100.png",128,100,true]},"qubely_author":{"display_name":"\u5927\u53d4","author_link":"https:\/\/www.citerp.com.tw\/citwp2\/author\/citadmin\/"},"qubely_comment":0,"qubely_category":"<a href=\"https:\/\/www.citerp.com.tw\/citwp2\/category\/program\/\" rel=\"category tag\">\u7a0b\u5f0f\u8a9e\u8a00<\/a>","qubely_excerpt":"\u5982\u4f55\u5728Delphi\u9650\u5236Edit\u53ea\u80fd\u8f38\u5165\u6578\u5b57\uff0c\u5927\u90e8\u5206\u7684\u505a\u6cd5\u662f\u5728Edit\u7684OnKeyPress\u4e8b\u4ef6\u4e2d\u52a0\u5165\u9650\u5236\u5f0f\uff0c\u63a5...","yoast_head":"<!-- This site is optimized with the Yoast SEO plugin v17.8 - https:\/\/yoast.com\/wordpress\/plugins\/seo\/ -->\n<title>Delphi\u9650\u5236Edit\u53ea\u80fd\u8f38\u5165\u6578\u5b57 - \u514d\u8cbb\u8cc7\u6e90\u793e\u7fa4<\/title>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-1\/\" \/>\n<meta property=\"og:locale\" content=\"zh_TW\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"Delphi\u9650\u5236Edit\u53ea\u80fd\u8f38\u5165\u6578\u5b57 - \u514d\u8cbb\u8cc7\u6e90\u793e\u7fa4\" \/>\n<meta property=\"og:description\" content=\"\u5982\u4f55\u5728Delphi\u9650\u5236Edit\u53ea\u80fd\u8f38\u5165\u6578\u5b57\uff0c\u5927\u90e8\u5206\u7684\u505a\u6cd5\u662f\u5728Edit\u7684OnKeyPress\u4e8b\u4ef6\u4e2d\u52a0\u5165\u9650\u5236\u5f0f\uff0c\u63a5 ... \u95b1\u8b80\u66f4\u591a\" \/>\n<meta property=\"og:url\" content=\"https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-1\/\" \/>\n<meta property=\"og:site_name\" content=\"\u514d\u8cbb\u8cc7\u6e90\u793e\u7fa4\" \/>\n<meta property=\"article:published_time\" content=\"2022-06-28T10:28:58+00:00\" \/>\n<meta property=\"article:modified_time\" content=\"2022-10-13T07:38:41+00:00\" \/>\n<meta property=\"og:image\" content=\"https:\/\/www.citerp.com.tw\/citwp2\/wp-content\/uploads\/2022\/06\/delphi-1-1-1.png\" \/>\n\t<meta property=\"og:image:width\" content=\"128\" \/>\n\t<meta property=\"og:image:height\" content=\"128\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"Written by\" \/>\n\t<meta name=\"twitter:data1\" content=\"\u5927\u53d4\" \/>\n\t<meta name=\"twitter:label2\" content=\"Est. reading time\" \/>\n\t<meta name=\"twitter:data2\" content=\"1 \u5206\u9418\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"WebSite\",\"@id\":\"https:\/\/www.citerp.com.tw\/citwp2\/#website\",\"url\":\"https:\/\/www.citerp.com.tw\/citwp2\/\",\"name\":\"\\u514d\\u8cbb\\u8cc7\\u6e90\\u793e\\u7fa4\",\"description\":\"\\u3000\\u3000\\u3000\\u3000\\u3000\\u3000\\u3000\\u5584\\u7528\\u7db2\\u8def\\u8cc7\\u6e90\\u627e\\u5230\\u66f4\\u7f8e\\u597d\\u7684\\u751f\\u6d3b..\",\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\/\/www.citerp.com.tw\/citwp2\/?s={search_term_string}\"},\"query-input\":\"required name=search_term_string\"}],\"inLanguage\":\"zh-TW\"},{\"@type\":\"ImageObject\",\"@id\":\"https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-1\/#primaryimage\",\"inLanguage\":\"zh-TW\",\"url\":\"https:\/\/www.citerp.com.tw\/citwp2\/wp-content\/uploads\/2022\/06\/delphi-1-1-1.png\",\"contentUrl\":\"https:\/\/www.citerp.com.tw\/citwp2\/wp-content\/uploads\/2022\/06\/delphi-1-1-1.png\",\"width\":128,\"height\":128},{\"@type\":\"WebPage\",\"@id\":\"https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-1\/#webpage\",\"url\":\"https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-1\/\",\"name\":\"Delphi\\u9650\\u5236Edit\\u53ea\\u80fd\\u8f38\\u5165\\u6578\\u5b57 - \\u514d\\u8cbb\\u8cc7\\u6e90\\u793e\\u7fa4\",\"isPartOf\":{\"@id\":\"https:\/\/www.citerp.com.tw\/citwp2\/#website\"},\"primaryImageOfPage\":{\"@id\":\"https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-1\/#primaryimage\"},\"datePublished\":\"2022-06-28T10:28:58+00:00\",\"dateModified\":\"2022-10-13T07:38:41+00:00\",\"author\":{\"@id\":\"https:\/\/www.citerp.com.tw\/citwp2\/#\/schema\/person\/0aa923c8012bd2d1265f8dc51bc19007\"},\"breadcrumb\":{\"@id\":\"https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-1\/#breadcrumb\"},\"inLanguage\":\"zh-TW\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-1\/\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-1\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"\\u9996\\u9801\",\"item\":\"https:\/\/www.citerp.com.tw\/citwp2\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Delphi\\u9650\\u5236Edit\\u53ea\\u80fd\\u8f38\\u5165\\u6578\\u5b57\"}]},{\"@type\":\"Person\",\"@id\":\"https:\/\/www.citerp.com.tw\/citwp2\/#\/schema\/person\/0aa923c8012bd2d1265f8dc51bc19007\",\"name\":\"\\u5927\\u53d4\",\"image\":{\"@type\":\"ImageObject\",\"@id\":\"https:\/\/www.citerp.com.tw\/citwp2\/#personlogo\",\"inLanguage\":\"zh-TW\",\"url\":\"https:\/\/secure.gravatar.com\/avatar\/26ac9fa540152f6a281d4515791706a2351cb504d50b3a9442e77693e6329617?s=96&d=mm&r=g\",\"contentUrl\":\"https:\/\/secure.gravatar.com\/avatar\/26ac9fa540152f6a281d4515791706a2351cb504d50b3a9442e77693e6329617?s=96&d=mm&r=g\",\"caption\":\"\\u5927\\u53d4\"},\"sameAs\":[\"http:\/\/localhost\/wp2\"],\"url\":\"https:\/\/www.citerp.com.tw\/citwp2\/author\/citadmin\/\"}]}<\/script>\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"title":"Delphi\u9650\u5236Edit\u53ea\u80fd\u8f38\u5165\u6578\u5b57 - \u514d\u8cbb\u8cc7\u6e90\u793e\u7fa4","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-1\/","og_locale":"zh_TW","og_type":"article","og_title":"Delphi\u9650\u5236Edit\u53ea\u80fd\u8f38\u5165\u6578\u5b57 - \u514d\u8cbb\u8cc7\u6e90\u793e\u7fa4","og_description":"\u5982\u4f55\u5728Delphi\u9650\u5236Edit\u53ea\u80fd\u8f38\u5165\u6578\u5b57\uff0c\u5927\u90e8\u5206\u7684\u505a\u6cd5\u662f\u5728Edit\u7684OnKeyPress\u4e8b\u4ef6\u4e2d\u52a0\u5165\u9650\u5236\u5f0f\uff0c\u63a5 ... \u95b1\u8b80\u66f4\u591a","og_url":"https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-1\/","og_site_name":"\u514d\u8cbb\u8cc7\u6e90\u793e\u7fa4","article_published_time":"2022-06-28T10:28:58+00:00","article_modified_time":"2022-10-13T07:38:41+00:00","og_image":[{"width":128,"height":128,"url":"https:\/\/www.citerp.com.tw\/citwp2\/wp-content\/uploads\/2022\/06\/delphi-1-1-1.png","type":"image\/png"}],"twitter_card":"summary_large_image","twitter_misc":{"Written by":"\u5927\u53d4","Est. reading time":"1 \u5206\u9418"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"WebSite","@id":"https:\/\/www.citerp.com.tw\/citwp2\/#website","url":"https:\/\/www.citerp.com.tw\/citwp2\/","name":"\u514d\u8cbb\u8cc7\u6e90\u793e\u7fa4","description":"\u3000\u3000\u3000\u3000\u3000\u3000\u3000\u5584\u7528\u7db2\u8def\u8cc7\u6e90\u627e\u5230\u66f4\u7f8e\u597d\u7684\u751f\u6d3b..","potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/www.citerp.com.tw\/citwp2\/?s={search_term_string}"},"query-input":"required name=search_term_string"}],"inLanguage":"zh-TW"},{"@type":"ImageObject","@id":"https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-1\/#primaryimage","inLanguage":"zh-TW","url":"https:\/\/www.citerp.com.tw\/citwp2\/wp-content\/uploads\/2022\/06\/delphi-1-1-1.png","contentUrl":"https:\/\/www.citerp.com.tw\/citwp2\/wp-content\/uploads\/2022\/06\/delphi-1-1-1.png","width":128,"height":128},{"@type":"WebPage","@id":"https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-1\/#webpage","url":"https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-1\/","name":"Delphi\u9650\u5236Edit\u53ea\u80fd\u8f38\u5165\u6578\u5b57 - \u514d\u8cbb\u8cc7\u6e90\u793e\u7fa4","isPartOf":{"@id":"https:\/\/www.citerp.com.tw\/citwp2\/#website"},"primaryImageOfPage":{"@id":"https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-1\/#primaryimage"},"datePublished":"2022-06-28T10:28:58+00:00","dateModified":"2022-10-13T07:38:41+00:00","author":{"@id":"https:\/\/www.citerp.com.tw\/citwp2\/#\/schema\/person\/0aa923c8012bd2d1265f8dc51bc19007"},"breadcrumb":{"@id":"https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-1\/#breadcrumb"},"inLanguage":"zh-TW","potentialAction":[{"@type":"ReadAction","target":["https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-1\/"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/www.citerp.com.tw\/citwp2\/2022\/06\/28\/delphi-1\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"\u9996\u9801","item":"https:\/\/www.citerp.com.tw\/citwp2\/"},{"@type":"ListItem","position":2,"name":"Delphi\u9650\u5236Edit\u53ea\u80fd\u8f38\u5165\u6578\u5b57"}]},{"@type":"Person","@id":"https:\/\/www.citerp.com.tw\/citwp2\/#\/schema\/person\/0aa923c8012bd2d1265f8dc51bc19007","name":"\u5927\u53d4","image":{"@type":"ImageObject","@id":"https:\/\/www.citerp.com.tw\/citwp2\/#personlogo","inLanguage":"zh-TW","url":"https:\/\/secure.gravatar.com\/avatar\/26ac9fa540152f6a281d4515791706a2351cb504d50b3a9442e77693e6329617?s=96&d=mm&r=g","contentUrl":"https:\/\/secure.gravatar.com\/avatar\/26ac9fa540152f6a281d4515791706a2351cb504d50b3a9442e77693e6329617?s=96&d=mm&r=g","caption":"\u5927\u53d4"},"sameAs":["http:\/\/localhost\/wp2"],"url":"https:\/\/www.citerp.com.tw\/citwp2\/author\/citadmin\/"}]}},"_links":{"self":[{"href":"https:\/\/www.citerp.com.tw\/citwp2\/wp-json\/wp\/v2\/posts\/1820","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.citerp.com.tw\/citwp2\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.citerp.com.tw\/citwp2\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.citerp.com.tw\/citwp2\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.citerp.com.tw\/citwp2\/wp-json\/wp\/v2\/comments?post=1820"}],"version-history":[{"count":4,"href":"https:\/\/www.citerp.com.tw\/citwp2\/wp-json\/wp\/v2\/posts\/1820\/revisions"}],"predecessor-version":[{"id":2718,"href":"https:\/\/www.citerp.com.tw\/citwp2\/wp-json\/wp\/v2\/posts\/1820\/revisions\/2718"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/www.citerp.com.tw\/citwp2\/wp-json\/wp\/v2\/media\/1823"}],"wp:attachment":[{"href":"https:\/\/www.citerp.com.tw\/citwp2\/wp-json\/wp\/v2\/media?parent=1820"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.citerp.com.tw\/citwp2\/wp-json\/wp\/v2\/categories?post=1820"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.citerp.com.tw\/citwp2\/wp-json\/wp\/v2\/tags?post=1820"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}