{"id":4679,"date":"2017-09-18T12:34:39","date_gmt":"2017-09-18T04:34:39","guid":{"rendered":"http:\/\/blog.qdac.cc\/?p=4679"},"modified":"2017-09-18T12:34:39","modified_gmt":"2017-09-18T04:34:39","slug":"qmacros-%e4%bd%bf%e7%94%a8%e8%bf%ad%e4%bb%a3%e5%99%a8%e6%9d%a5%e9%87%8d%e5%a4%8d%e5%86%85%e5%ae%b9","status":"publish","type":"post","link":"https:\/\/blog.qdac.cc\/?p=4679","title":{"rendered":"[QMacros] \u4f7f\u7528\u8fed\u4ee3\u5668\u6765\u91cd\u590d\u5185\u5bb9"},"content":{"rendered":"<p>QMacros 2017\u5e749\u670818\u65e5\u63d0\u4ea4\u7684\u7248\u672c\u652f\u6301\u4e86\u8fed\u4ee3\u5668\uff0c\u4ee5\u91cd\u590d\u66ff\u6362\u67d0\u4e00\u90e8\u5206\u5185\u5bb9\u3002<\/p>\n<p>\u8fed\u4ee3\u5668\u7684\u58f0\u660e\uff1a<\/p>\n<pre class=\"lang:delphi decode:true\">IQMacroIterator = interface\r\n    ['{3DB5D84F-0539-4C10-9476-E6B71D3099DE}']\r\n    \/\/ \u5f00\u59cb\u66ff\u6362\r\n    procedure BeginReplace(AMacro: TQMacroItem);\r\n    \/\/ \u5224\u65ad\u662f\u5426\u8fd8\u6709\u8981\u5904\u7406\u7684\u6570\u636e\r\n    function HasNext: Boolean;\r\n    \/\/ \u6267\u884c\u4e00\u6b21\u66ff\u6362\r\n    function Replace: QStringW;\r\n    \/\/ \u7ed3\u675f\u66ff\u6362\r\n    procedure EndReplace;\r\n    \/\/ \u83b7\u53d6\u5f53\u524d\u6d3b\u52a8\u7684\u8fed\u4ee3\u5668\u5e8f\u53f7\r\n    function GetItemIndex: Integer;\r\n  end;\r\n<\/pre>\n<p>\u597d\u5427\uff0c\u8fd9\u662f\u4e00\u4e2a\u63a5\u53e3\uff0c\u8fd9\u5c31\u610f\u5473\u7740\uff0c\u6211\u4eec\u7ed1\u5b9a\u67d0\u4e2a\u5b8f\u5230\u8fd9\u4e2a\u8fed\u4ee3\u5668\u4e4b\u524d\uff0c\u9700\u8981\u5148\u5b9e\u73b0\u4e00\u4e2a\u8fed\u4ee3\u5668\u3002\u6211\u4eec\u53ef\u4ee5\u7ee7\u627f\u81ea TQMacroIterator \u5b9e\u73b0\u4e00\u4e2a\u81ea\u5e26\u7684\u8fed\u4ee3\u5668\u7ed1\u5b9a\uff0c\u4ece\u800c\u5b9e\u73b0\u81ea\u5df1\u7684\u66ff\u6362\u89c4\u5219\u3002\u8981\u5b9e\u73b0\u81ea\u5df1\u7684\u8fed\u4ee3\u5668\uff0c\u53ef\u4ee5\u770b\u4e00\u4e0b\u9ed8\u8ba4\u7684 TQMacroDataSetIterator \u5b9e\u73b0\u6765\u53c2\u8003\u4e00\u4e0b\u3002<\/p>\n<p>QMacros \u5185\u7f6e\u4e86\u6570\u636e\u96c6\u7684\u8fed\u4ee3\u5668\uff0c\u5047\u8bbe\u4f60\u7684\u6570\u636e\u96c6\u7684 Name \u4e3a adsData\uff0c\u5219 adsData.@Rows \u5b8f\u5bf9\u5e94\u7684\u5c31\u662f\u4e00\u4e2a\u8fed\u4ee3\u5668\uff0c\u8fd9\u4e2a\u5b8f\u5305\u542b\u4e09\u4e2a\u53c2\u6570\uff1a<\/p>\n<ul>\n<li>\u8981\u66ff\u6362\u7684\u6a21\u677f\uff0c\u4e00\u4e2a\u5b57\u7b26\u4e32\u7c7b\u578b\u7684\u53c2\u6570\uff0c\u8f6c\u4e49\u8bed\u6cd5\u9075\u5b88 C\/Java \u8bed\u6cd5\uff1b<\/li>\n<li>\u6a21\u677f\u4e2d\u5b8f\u7684\u8d77\u59cb\u5b57\u7b26\u6807\u5fd7\u5b57\u7b26\u4e32<\/li>\n<li>\u6a21\u677f\u4e2d\u5b8f\u7684\u7ed3\u675f\u5b57\u7b26\u6807\u5fd7\u5b57\u7b26\u4e32<\/li>\n<\/ul>\n<p>\u6211\u4eec\u6765\u770b\u4e00\u4e2a\u793a\u4f8b\uff1a<\/p>\n<pre class=\"lang:delphi decode:true\">procedure TForm1.Button1Click(Sender: TObject);\r\nconst\r\n  STableTemplate: QStringW = '&lt;html&gt;&lt;head&gt;&lt;title&gt;&lt;%Title%&gt;&lt;\/title&gt;&lt;\/head&gt;' + \/\/\r\n    '&lt;body&gt;\u8fd9\u662f\u4e00\u4e2a\u8868\u683c&lt;table border=\"1\"  cellspacing=\"0\" cellpadding=\"0\" bordercolor=\"#000000\" style=\"BORDER-COLLAPSE: collapse\"&gt;'\r\n    + \/\/\r\n    '&lt;th&gt;&lt;tr&gt;&lt;td&gt;\u8bb0\u5f55\u53f7&lt;\/td&gt;&lt;td&gt;\u5e8f\u53f7&lt;\/td&gt;&lt;td&gt;\u7f16\u53f7&lt;\/td&gt;&lt;td&gt;\u59d3\u540d&lt;\/td&gt;&lt;\/tr&gt;&lt;\/th&gt;' + \/\/\r\n    '%adsData.@Rows(\"&lt;tr&gt;&lt;td&gt;%adsData.@RecNo%&lt;\/td&gt;&lt;td&gt;%adsData.@Rows.@Index%&lt;td&gt;%Id%&lt;\/td&gt;&lt;td&gt;%Name%&lt;\/td&gt;&lt;\/tr&gt;\",\"%\",\"%\")%'\r\n    + \/\/\r\n    '&lt;\/table&gt;&lt;\/body&gt;';\r\nvar\r\n  AMacros: TQMacroManager;\r\n  AHtmlFile, AHtmlText, ATag: String;\r\nbegin\r\n  AMacros := TQMacroManager.Create;\r\n  try\r\n    AMacros.Push(adsData, '');\r\n    AMacros.Push('Title', 'QMacros HTML Tag \u66ff\u6362');\r\n    AHtmlText := AMacros.Replace(STableTemplate, '%', '%', MRF_PARSE_PARAMS);\r\n    AHtmlFile := ExtractFilePath(Application.ExeName) + 'index.html';\r\n    SaveTextW(AHtmlFile, AHtmlText);\r\n    WebBrowser1.Navigate('file:\/\/\/' + StringReplaceW(AHtmlFile, '\\', '\/',\r\n      [rfReplaceAll]));\r\n    AMacros.Pop(adsData, '');\r\n  finally\r\n    FreeAndNil(AMacros);\r\n  end;\r\nend;<\/pre>\n<p>\u5728\u8fd9\u4e2a\u793a\u4f8b\u4e2d\uff0cSTableTemplate \u662f\u4e00\u4e2a\u7b80\u5355\u7684HTML\u6a21\u677f\uff0c\u6211\u4eec\u9700\u8981\u5c06\u6570\u636e\u96c6adsData\u7684\u5185\u5bb9\uff0c\u8f93\u51fa\u4e3a\u4e00\u4e2aHTML\u7684\u8868\u683c\uff0c\u90a3\u4e48\u6838\u5fc3\u5c31\u5728<\/p>\n<blockquote><p>%adsData.@Rows(&#8220;&lt;tr&gt;&lt;td&gt;%adsData.@RecNo%&lt;\/td&gt;&lt;td&gt;%adsData.@Rows.@Index%&lt;td&gt;%Id%&lt;\/td&gt;&lt;td&gt;%Name%&lt;\/td&gt;&lt;\/tr&gt;&#8221;,&#8221;%&#8221;,&#8221;%&#8221;)%<\/p><\/blockquote>\n<p>\u8fd9\u4e00\u884c\uff1aadsData.@Rows \u5728\u6211\u4eec\u8c03\u7528 AMacros.Push(adsData,&#8221;) \u65f6\uff0c\u88ab\u81ea\u52a8\u5165\u6808\u4e3a\u4e00\u4e2a\u8fed\u4ee3\u5668\uff0c\u5f53\u6211\u4eec\u8c03\u7528 AMacros.Replace \u6765\u6267\u884c\u66ff\u6362\u65f6\uff0c\u5b83\u4f1a\u4ece\u7b2c\u4e00\u6761\u8bb0\u5f55\u5faa\u73af\u5230\u6700\u540e\u4e00\u6761\u8bb0\u5f55\uff0c\u6309\u7167\u7b2c\u4e00\u4e2a\u53c2\u6570\u6307\u5b9a\u7684\u6a21\u677f\u5faa\u73af\u8f93\u51fa\u5185\u5bb9\uff0c\u5982\u679c\u5176\u4e2d\u5305\u542b\u5b8f\u5b9a\u4e49\uff0c\u5219\u4f1a\u66ff\u6362\u6210\u76f8\u5e94\u7684\u5b8f\u5b9a\u4e49\u3002<\/p>\n<p>\u6211\u4eec\u6765\u770b\u4e00\u4e0b\u8fd9\u6bb5\u4ee3\u7801\u7684\u6267\u884c\u7ed3\u679c\uff1a<\/p>\n<p><a href=\"https:\/\/blog.qdac.cc\/wp-content\/uploads\/2017\/09\/htmltemplate.png\"><img loading=\"lazy\" decoding=\"async\" class=\"aligncenter size-full wp-image-4683\" src=\"https:\/\/blog.qdac.cc\/wp-content\/uploads\/2017\/09\/htmltemplate.png\" alt=\"\" width=\"232\" height=\"270\" \/><\/a><\/p>\n<p>\u597d\u5427\uff0c\u5c31\u8bf4\u5230\u8fd9\u91cc\u3002\u5177\u4f53\u7684\u4ee3\u7801\u8bf7\u81ea\u884c SVN\/GIT \u68c0\u51fa\u3002<\/p>\n","protected":false},"excerpt":{"rendered":"<p>QMacros 2017\u5e749\u670818\u65e5\u63d0\u4ea4 [&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":[69,8,9,214,603],"tags":[734],"class_list":["post-4679","post","type-post","status-publish","format-standard","hentry","category-c-builder","category-delphi","category-qdac","category-qmacros","category-603","tag-734"],"views":3315,"_links":{"self":[{"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/posts\/4679","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=4679"}],"version-history":[{"count":1,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/posts\/4679\/revisions"}],"predecessor-version":[{"id":4684,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/posts\/4679\/revisions\/4684"}],"wp:attachment":[{"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=4679"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=4679"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=4679"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}