{"id":2585,"date":"2015-06-17T16:57:17","date_gmt":"2015-06-17T08:57:17","guid":{"rendered":"http:\/\/blog.qdac.cc\/?p=2585"},"modified":"2015-06-17T16:57:17","modified_gmt":"2015-06-17T08:57:17","slug":"vcl%e6%8e%a7%e4%bb%b6%e5%af%b9%e9%bd%90%e6%96%b9%e5%bc%8f%e5%a2%9e%e5%bc%ba%e5%87%bd%e6%95%b0","status":"publish","type":"post","link":"https:\/\/blog.qdac.cc\/?p=2585","title":{"rendered":"[VCL]\u63a7\u4ef6\u5bf9\u9f50\u65b9\u5f0f\u589e\u5f3a\u51fd\u6570"},"content":{"rendered":"<p>VCL \u7684 TAlign \u7684\u529f\u80fd\u6bd4\u8f83\u5f31\uff0c\u6709\u65f6\u5019\uff0c\u65e0\u6cd5\u6ee1\u8db3\u6211\u4eec\u5bf9\u9f50\u7684\u9700\u8981\uff0c\u6240\u4ee5\u8fd9\u91cc\u63d0\u4f9b\u4e86\u4e00\u4e2a\u989d\u5916\u7684 CustomAlign \u51fd\u6570\u6765\u5b9e\u73b0\u66f4\u591a\u7684\u5bf9\u9f50\u65b9\u5f0f\u3002\u5f53\u7136\uff0c\u5982\u679c\u4f60\u662f\u7528 FMX \u7684\u8bdd\uff0c\u8fd9\u4e9b\u5bf9\u9f50\u65b9\u5f0f\u5df2\u7ecf\u6709\u4e86\uff0c\u4f60\u53ef\u4ee5\u5ffd\u7565\u8fd9\u7bc7\u6587\u7ae0\u3002<\/p>\n<pre class=\"lang:delphi decode:true\">type\r\n  TCustomAlign = (caNone, caTop, caLeft, caRight, caBottom, caClient, caCenter,\r\n    caVertCenter, caHorzCenter, caHorizontal, caVertical);\r\nprocedure CustomAlign(ACtrl: TControl; ALayout: TCustomAlign);\r\n\r\nimplementation\r\n\r\nprocedure CustomAlign(ACtrl: TControl; ALayout: TCustomAlign);\r\nvar\r\n  R: TRect;\r\nbegin\r\n  if ALayout &lt;&gt; caNone then\r\n  begin\r\n    if ACtrl is TCustomForm then\r\n      R := (ACtrl as TCustomForm).Monitor.BoundsRect\r\n    else\r\n      R := ACtrl.Parent.ClientRect;\r\n    ACtrl.Align:=alNone;\r\n    case ALayout of\r\n      caTop:\r\n        ACtrl.SetBounds(R.Left, R.Top, R.Width, ACtrl.Height);\r\n      caLeft:\r\n        ACtrl.SetBounds(R.Left, R.Top, ACtrl.Width, R.Height);\r\n      caRight:\r\n        ACtrl.SetBounds(R.Right - ACtrl.Width, R.Top, ACtrl.Width, R.Height);\r\n      caBottom:\r\n        ACtrl.SetBounds(R.Left, R.Bottom - ACtrl.Height, R.Width, ACtrl.Height);\r\n      caClient:\r\n        ACtrl.SetBounds(R.Left, R.Top, R.Width, R.Height);\r\n      caCenter:\r\n        ACtrl.SetBounds(R.Left + (R.Width - ACtrl.Width) div 2,\r\n          R.Top + (R.Height - ACtrl.Height) div 2, ACtrl.Width, ACtrl.Height);\r\n      caVertCenter:\r\n        ACtrl.SetBounds(ACtrl.Left, R.Top + (R.Height - ACtrl.Height) div 2,\r\n          ACtrl.Width, ACtrl.Height);\r\n      caHorzCenter:\r\n        ACtrl.SetBounds(ACtrl.Left + (R.Width - ACtrl.Width) div 2, ACtrl.Top,\r\n          ACtrl.Width, ACtrl.Height);\r\n      caHorizontal:\r\n        ACtrl.SetBounds(R.Left, ACtrl.Top, R.Width, ACtrl.Height);\r\n      caVertical:\r\n        ACtrl.SetBounds(ACtrl.Left, R.Top, ACtrl.Width, R.Height);\r\n    end;\r\n  end;\r\nend;<\/pre>\n<p>\u5f53\u7136\uff0c\u5982\u679c\u60f3\u8981\u8fbe\u5230FMX\u7684\u5bf9\u9f50\u65b9\u5f0f\u7684\u6548\u679c\uff0c\u4ece TControl \u7ea7\u522b\u76f4\u63a5\u5b9e\u73b0\u5f53\u7136\u662f\u6700\u597d\u7684\uff0c\u4e0d\u8fc7\u8fd9\u91cc\u660e\u663e\u6709\u70b9\u96be\u5ea6\u3002<\/p>\n","protected":false},"excerpt":{"rendered":"<p>VCL \u7684 TAlign \u7684\u529f\u80fd\u6bd4\u8f83\u5f31\uff0c [&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,21],"tags":[423,294],"class_list":["post-2585","post","type-post","status-publish","format-standard","hentry","category-c-builder","category-delphi","category-misc","tag-423","tag-294"],"views":3138,"_links":{"self":[{"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/posts\/2585","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=2585"}],"version-history":[{"count":1,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/posts\/2585\/revisions"}],"predecessor-version":[{"id":2586,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/posts\/2585\/revisions\/2586"}],"wp:attachment":[{"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=2585"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=2585"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=2585"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}