TMSWEB Core 组件居中显示  
官方Delphi 学习QQ群: 682628230(三千人)
频道

TMSWEB Core 组件居中显示


var
  jsr: TJSDOMRect;
begin
  jsr := document.body.getBoundingClientRect;

  WebMemo1.Left := Round((jsr.right - jsr.left - WebMemo1.Width) / 2);


推荐分享
图文皆来源于网络,内容仅做公益性分享,版权归原作者所有,如有侵权请告知删除!
 

Copyright © 2014 DelphiW.com 开发 源码 文档 技巧 All Rights Reserved
晋ICP备14006235号-8 晋公网安备 14108102000087号

执行时间: 0.15947914123535 seconds