2017年8月21日
PageControl控件的高度自适应（遍历tabSheet内所有控件）
摘要： maxHeight := 0; with cxPageControl1.ActivePage do begin for i := 0 to ControlCount 1 do begin t := TControl(Controls[i]); if maxHeight 21 then cxPageC 阅读全文
posted @ 2017-08-21 15:07 penginfo 阅读(377) 评论(0) 推荐(0) 编辑