咱還是直奔主題,如何快速制作輸入界面呢?如下圖:
第一步,放置一個UnimFieldContainer,設置屬性:
AlignmentControl=uniAlignmentClient,讓客戶端處理對齊;
LayoutConfig.Padding=10,10,10,10,讓容器的四周內邊距留10個單位,避免下一步放的控件,撐滿全屏,太擠了。
第二步,放入錄入的控件,如unimDBEdit,設置屬性:
FieldLabel=如入項的標題,如日期
FieldLabelWidth=35,默認是30,不合適,可以適當調大
LayoutConfig.Width=100%,這一項重要,讓控件占滿屏寬,按屏寬顯示,感謝朋友風輕雲淡,沒他的幫助,我是花了幾個小時沒搞定的。
按第二步,繼續放置其他的輸入控件,最后設計期的樣子,如下圖:
運行,就看到第一張圖的效果了!
補充內容:
如果輸入控件多,超出屏高,我們還要讓UnimFieldContainer支持上下滑動,現在版本沒有屬性支持,需要增加以下代碼:
function afterCreate(sender){ sender.getContainer().setScrollable(true); }
再一次感謝風輕雲淡!
開發環境 delphi 10.3.3+unigui 1534