【Delphi】通过 LiveBindings Designer 链接控件示例

news/2024/9/22 16:31:22 标签: LiveBindings, delphi数据绑定

本教程展示了如何使用 LiveBindings Designer 可视化地创建控件之间的 LiveBindings,以便创建只需很少或无需源代码的应用程序。

在本教程中,您将创建一个高清多设备应用程序,该应用程序使用 LiveBindings 绑定多个对象,以更改圆的描边和填充颜色。所有绑定都是使用 LiveBindings Designer 以可视化方式无缝创建的。

步骤 1:创建项目

创建一个新项目。本例选择高清多设备应用程序(HD Multi-Device Application )。

  1. 将 TCircle组件拖放到表单设计器上 Form Designer。
  2. 在 “Tool Palette ”中找到一个 TColorPanel 控件并将其拖放到表单上。
  3. 对 TComboColorBox 控件也做同样的操作。

颜色面板控件color panel 将设置圆的填充颜色,而颜色组合框color combo box 将设置圆的描边颜色。

在表单上放置组件后,表单应如下图所示。

第 2 步:创建 LiveBindings

现在查看  LiveBindings Designer 窗口。如果不可见,请进入 “View”菜单,选择 “LiveBindings Designer ”命令。

  

或者控件右键菜单选择:Bind Visually...

您的图表包含代表表单对象的各个块。此时,它们之间还没有链接。找到表示圆的块 (Circle1),点击右下角的 3 个点。

1. 从 “Bindable Members ”对话框中选择 “Fill.Color ”和 “Stroke.Color ”属性。

按下 “OK ”后,Circle1 组件将被绘制并显示两个属性。

2. 单击 ComboColorBox1 块的 Color 属性,然后拖动一条线到 Circle1 块的 Stroke.Color 属性。

3. 单击 ColorPanel1 图块的Color属性,然后拖动一条线到 Circle1 图块的 Fill.Color 属性。

4. 按下 “重新排列 ”按钮 ,可以自动排列图表,也可以自行排列图块。

此时,您的绑定图应该如下图所示。

结果

按 F9 键或使用 Run > Run菜单命令运行应用程序。更改颜色并观察结果。

这个功能是不是就是VUE中的数据绑定一样一样的。


http://www.niftyadmin.cn/n/5670577.html

相关文章

Spring Mybatis 动态语句 总结

1.简介 Mybatis 提供动态语句的功能来增强多条件变动的查询语句。 2.代码 if和where搭配使用&#xff1a; <select id"query" resultType"a">select * from t_a<where><!-- where内没有条件满足&#xff0c;不转成where&#xff0c;有…

【LLM学习之路】9月16日 第六天

【LLM学习之路】9月16日 第六天 损失函数 L1Loss 可以取平均也可以求和 参数解析 input &#xff08;N&#xff0c;*&#xff09; N是batchsize&#xff0c;星号代表可以是任意维度 不是输入的参数&#xff0c;只是描述数据 target 形状要同上 MSELoss平方差 CrossEntr…

C#测试调用PdfiumViewer浏览PDF文件的基本用法

印章管理项目后续准备实现打开浏览PDF文件并进行盖章的功能&#xff0c;需要在Winform中使用控件在线浏览PDF文件&#xff0c;在网上找了几个开源的PDF浏览控件进行测试&#xff0c;以便应用于印章管理项目。本文测试调用PdfiumViewer模块打开及浏览PDF文件。   PdfiumViewer…

Redis 缓存雪崩、缓存穿透、缓存击穿详解

缓存雪崩 缓存雪崩指的是大量缓存数据在同一时间失效&#xff0c;导致所有请求直接打到数据库或下游系统&#xff0c;造成数据库瞬时压力剧增&#xff0c;甚至可能引发系统崩溃。 形成原因&#xff1a; 缓存数据同时过期&#xff1a;由于缓存过期时间设置不合理&#xff0c;…

初识ZYNQ——FPGA学习笔记15

一、ZYNQ简介 ZYNQ&#xff1a;Zynq-7000 All Programmable SoC&#xff08;APSoC&#xff09;&#xff0c;赛灵思公司&#xff08;AMD Xilinx&#xff09;推出的新一代全可编程片上系统 PS&#xff1a;Processing System&#xff0c;处理系统 PL&#xff1a;Program Logic&…

react:组件通信

组件通信 父组件向子组件通信 function App() {return (<div><div>这是父组件</div><Child name"这是子组件" /></div>); }// 子组件 function Child(props) {return <div>{props.name}</div>; }props说明 props可以传…

代码随想录算法训练营第三十五天 | 01背包问题 二维,01背包问题 一维,416. 分割等和子集

三十五天打卡&#xff0c;背包问题入门&#xff0c;之前做过还是比较容易的 46.卡码网【携带研究材料】 题目链接 解题过程 采用二维bp&#xff0c;bp[i][j]的含义是&#xff0c;背包容量为j&#xff0c;只装序号为0~i的物品时能装的最大价值若背包容量大于等于当前物品的重…

python脚本转mac app+app签名公正

python脚本转mac appapp签名公正 1.python打包&#xff0c;有id的可以加上--codesign-identity&#xff0c;然后提交公正&#xff0c;可以避免给别人用的时候需要去设置中信任的问题。没有的话可以忽略&#xff0c;打完包也不用看2和3了创建完证书&#xff0c;本地双击打开一下…