文档章节

Delphi XE2 新功能:LiveBindings --- 把对象之间的属性绑定起来

vga
 vga
发布于 2016/08/09 08:25
字数 563
阅读 21
收藏 0

Delphi XE2 新功能:LiveBindings --- 把对象之间的属性绑定起来 日期:2011年9月9日 作者: 人气:5340 查看:[大字体 中字体 小字体]

XE2 有了 FireMonkey 框架,它不同于 VCL ,以往的数据感知控件不能放在它上面,所以 XE2 提供了 LiveBindings 功能作为替代方案。另外它也是个通用的基础设施,同样可用于传统的VCL

这里用一个极简化的例子说明它的意图,在窗体上放一个 edit 和一个 label,找到 label 的 LiveBindings 属性,选 New LiveBinding... ,再选择 TBindExpression

然后设置属性如图所示

这样就把 edit 的 text 属性和 label 的 caption 属性绑定起来了,不用写任何代码。运行后,会看到 label 的内容就是 edit 的 text 值,但是在 edit 中输入内容,label 却没有跟着变化,如果要重新获得 edit 的值,可以用代码: Self.BindExpressionLabel11.Evaluate; //这个BindExpressionLabel11,就是刚才点 New LiveBinding... 时新建的对象。

BindExpressionLabel11 的 SourceComponent 属性,用于指定数据来源于哪里(哪个对象)。SourceExpression 属性,是一个表达式,示例中只是简单的写了 text,这个 text 就是 SourceComponent 的属性(也就是指 TEdit 的属性)。 还可以写这样的表达式: text+'aaa' name+text

但是却不能写 trim(text) 这样的表达式,不过我们可以用它的 OnAssignValue 事件来实现这个功能,这个事件在 Evaluate 时触发,表达式所计算出来的值被放在事件的 var Value: TValue 参数里,它是个var 的,所以可以修改它的值。 view plaincopy to clipboardprint?

  1. procedure TForm1.BindExpressionLabel1AssignValue(
  2. AssignValueRec: TBindingAssignValueRec; var Value: TValue;
  3. var Handled: Boolean);
  4. begin
  5. value:=trim(value.AsString);
  6. end;

LiveBingings 也可以感知数据集,但是要在 FireMonkey 2D Application 环境下,在窗体上放一个 label,同样再找到 LiveBindings 属性,会发现它多了一项 Link to DB Field...

选择它,出现下面的图,这个界面里的树,描述了当前窗体上放置的数据集,和它的字段,设置好后,它看起来就象是个 TRzDbLabel 了,实时显示字段值,不需要象上面的例子那样写Evaluate()

(出处:http://blog.csdn.net/zzzl/article/details/6698202)

本文转载自:http://www.delphifans.com/infoview/Article_6561.html

共有 人打赏支持
vga

vga

粉丝 21
博文 357
码字总数 24097
作品 0
佳木斯
Delphi XE2:这就是我们所期待的Delphi吗?

版权声明:本文为 OSChina.NET 原创编译 转载务必注明出处,并保留链接! 作者:蒂姆.安德森 Delphi是被一些人遗忘了的快速应用程序开发工具,但它与可视组件库相结合,依然是开发Windows本机...

虫虫
2011/10/31
40.4K
49
Android开发数据库三层应用-DataSnap

Android开发数据库三层应用-DataSnap 时间:2013-10-24 13:41:54 点击:4988   核心提示:我觉得Delphi最强大的的功能之一就是开发数据库三层应用的DataSnap,在Android上的实现,首先是完...

vga
2014/06/01
0
0
PostgreSQL的Delphi组件--PostgreDAC

PostgreDAC 是适合 Delphi/C++ Builder 操作 PostgreSQL 数据库的功能非常强大的组件包,允许你创建直连 PostgreSQL 数据库的 Delphi/C++ Builder 应用,无需 BDE 和 ODBC 支持。 使用 Post...

匿名
2012/03/20
2.1K
0
使用delphi 开发 web(一) webbroke 简介

从delphi 3 开始,就可以支持使用webbroke 技术开发基于web 服务器。当时主要是支持CGI和ISAPI. CGI 其实就是一个类似控制台的可执行程序,将其放入web 服务器的可执行目录,每次web 服务器调...

xalion
2012/01/04
0
0
delphi 模式编程 第二章总结

本章重点摘要: 对象模型机制 动态绑定机制 类型转换机制 接口抽象机制 一、对象模型机制 对象本质: 相关代码和数据的组合,是包含相互之间有联系的过程集和数据的软件包 可以视为变量,其类...

CODER-SU
2013/06/14
0
0

没有更多内容

加载失败,请刷新页面

加载更多

android引入jar的一个错误

使用eclipse+sdk开发android的app,如果要引入一个jar包,可以放到./libs/xxx.jar路径下就可以了。今天引入一个aaa.jar的包,也放到./libs/aaa.jar路径下。app编译没有问题,但一运行就如下的...

kyle960
4分钟前
0
0
django修改密码强制退出机制

起因 BUG出现 系统升级django版本后经常出现自动退出登录 问题复现 系统升级django(大版本,如1.8、1.11和2.0)后,旧版与新版同时运行,同一各User用旧版authenticate验证后会导致新版中已...

张豪飞
12分钟前
0
0
SylixOS异常管理

异常管理   SylixOS提供了一种平台无关的异常管理方法。当系统产生了写时拷贝、缺页等MMU访问失效异常或其他种类异常时,SylixOS会在异常中构建异常处理线程执行陷阱,在异常退出后的任务上...

huikai309
13分钟前
0
0
Java HashMap 初始化赋值 (不建议)

1、HashMap 初始化的文艺写法 看完这段代码,很多人都会觉得这么写太啰嗦了,文艺青年一般这么来了: HashMap<String, String> map = new HashMap<String, String>() { { put("name", "test"...

SuShine
17分钟前
1
0
Lvs与Keepalived集群

一、LVS安装 1、[root@localhost ~]# yum install -y ipvsadm 2、[root@localhost ~]# vi /etc/sysctl.conf net.ipv4.ip_forward = 1 执行如下命令来应用: [root@localhost ~]# sysctl -p ......

freelb
21分钟前
0
0

没有更多内容

加载失败,请刷新页面

加载更多

返回顶部
顶部