本例实现了表格内任意插入:图片、文本、超链接、选择框、按钮等等组件。
★ 全网首发,独家黑科技。
鉴于本人审美水平有限,谈不上漂亮,主打一个花里胡哨,各位拿去自行配色吧。
请升级customPlus库至最新版,增加画线、paint自绘功能,可以穿插于各项目之间绘制图形,可以让你的图形在表格上任意飞。
本例程完整文件(含代码、图片等)下载地址:
https://wwow.lanzouq.com/idmgI2jz4qxa
https://aardio.online/attach-download-374.htm
import win.ui;
/*DSG{
{*/
var winform = win.form(text="aardio form";right=423;bottom=469)
winform.add(
plus={cls="plus";left=8;top=8;right=388;bottom=464;bgcolor=16777215;db=1;dl=1;dt=1;notify=1;z=1};
scrollbar={cls="scrollbar";left=392;top=8;right=416;bottom=464;db=1;dl=1;dt=1;edge=1;z=2}
)
/*}}*/
winform.show();
import godking.customPlus
if godking.customPlus._version<4.3 error(" 请升级 godking.customPlus 库至最新版(不低于4.3)")
var dpi = godking.customPlus.getDpi();
var pen_black = ..gdip.pen(0xFF000000, 1*dpi);
pen_black.dashStyle = 1/*_DashStyleDot*/;
var pen_red = ..gdip.pen(0xFFFF0000, 1*dpi);
pen_red.dashStyle = 1/*_DashStyleDot*/;
var cp;
var itemModel = {
{
/* 矩形 */
type = "rect",
name = "bk";
rectf = {x = 0;y = 0;width = 380;height = 40}
}, {
/* 图像 */
type = "img",
rectf = {x = 5;y = 5;width = 30;height = 30},
name = "logo