上一页 1 ··· 13 14 15 16 17 18 19 20 21 ··· 215 下一页
摘要: 有两个和克隆相关的方法: Clone()、CloneChildFromStream().Clone() 很好用, 但 CloneChildFromStream() 的源码很明显地写错了(是小问题, 谁外语好去报一下).procedure TForm1.FormCreate(Sender: TObject);var i: Integer;begin for i := 0 to 9 do ListBox1.Items.Add('Item' + IntToStr(i));end;{把 ListBox1 克隆到 Panel1}procedure TForm1.Button1Click( 阅读全文
posted @ 2011-10-05 19:19 万一 阅读(3425) 评论(4) 推荐(0) 编辑
摘要: SaveToStream()、LoadFromStream() 对应文本流;SaveToBinStream()、LoadFromBinStream() 对应二进制流; 相对文本流, 二进制流会小一些.有这几个方法, 控件数据与状态的序列化就太容易了.示例:1、控件: ListBox1、Button1、Button22、事件: Button1.OnClick、Button2.OnClick、Form1.OnCreateunit Unit1;interfaceuses System.SysUtils, System.Types, System.UITypes, System.Classes, S. 阅读全文
posted @ 2011-10-05 14:34 万一 阅读(4972) 评论(4) 推荐(1) 编辑
摘要: //待补... 阅读全文
posted @ 2011-10-03 22:07 万一 阅读(3011) 评论(0) 推荐(0) 编辑
摘要: 一、全设计时操作:先在窗体上放置控件:DataSource1 : TDataSource;ClientDataSet1 : TClientDataSet;Label1 : TLabel;Edit1 : TEdit;Memo1 : TMemo;ImageControl1 : TImageControl;BindNavigator1 : TBindNavigator;{在连接过程中, 会自动添加下面部件}BindingsList1 : TBindingsList;BindScopeDB1 ... 阅读全文
posted @ 2011-10-03 22:06 万一 阅读(8337) 评论(9) 推荐(0) 编辑
摘要: 表达式中的函数有限, 譬如我想通过绑定输出文本的长度(譬如在 Label1 中绑定输出 Edit1.Text 的长度)就没有相应的函数;这可在 TBindExpression 的 OnAssigningValue 事件中处理.TBindExpression 和它的兄弟们 (TBindExprItems、TBindLink、TBindListLink、TBindGridLink、TBindPosition、TBindList、TBindGridList、TBindDBEditLink、TBindDBTextLink、TBindDBListLink、TBindDBImageLink、TBindDB 阅读全文
posted @ 2011-10-03 14:07 万一 阅读(3691) 评论(0) 推荐(0) 编辑
摘要: TBindingsList 中可能不止一个表达式, 通过表达式的 Evaluate 方法可单独提交绑定, 并可在 Active = False 时提交.在 TBindExprItems 中对应的方法是 EvaluateFormat.测试设想: Label1、Label2 的绑定源同是 Edit1, 分别提交绑定.1、在窗体上加控件: Label1、Label2、Edit1、BindingsList1;2、激活 Edit1 的 OnKeyUp、OnChange 事件, 还有窗体的默认事件.unit Unit1;interfaceuses System.SysUtils, System.Type. 阅读全文
posted @ 2011-10-03 12:51 万一 阅读(3350) 评论(0) 推荐(0) 编辑
摘要: 示例构想: 用 Label1 显示 ListBox1 的选项, 用 Label2 显示 CheckBox1 的状态.1、放控件: Label1、Label2、ListBox1、CheckBox1、BindingsList1、BindScope1;2、激活 ListBox1 的 OnClick 事件和窗体的默认事件.unit Unit1;interfaceuses System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants, FMX.Types, FMX.Controls, FMX.Forms,.. 阅读全文
posted @ 2011-10-03 10:43 万一 阅读(3798) 评论(0) 推荐(0) 编辑
摘要: 如果在编写表达式时, 如果能够随意指认需要的控件就好了(通过 Owner 也可以勉强做到), TBindScope 就是解决这个问题的.示例设想: 把三个 TEdit 的 Text 绑定到一个 TLabel.在窗体上添加 Label1、Edit1、Edit2、Edit3、BindingsList1、BindScope1; 激活 Edit1 和窗体的默认事件.unit Unit1;interfaceuses System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants, FMX.Types, FM.. 阅读全文
posted @ 2011-10-03 09:49 万一 阅读(3350) 评论(0) 推荐(0) 编辑
摘要: 如果要给一对 "源控件" 和 "目标控件" 写多个表达式, 使用 TBindExpression 就不如 TBindExprItems 了.TBindExprItems 中的表达式又分两组: FormatExpressions、ClearExpressions, 后者是在断开绑定时的表达式.示例设想:1、TrackBar1 为源, 把其 Value 值绑定给 Edit1.Text 和 Edit1.Width 和 Label1.Text;2、断开绑定时, 在 Edit1 中显示 "已断开绑定".先在窗体上添加: TrackBar1、Ed 阅读全文
posted @ 2011-10-02 23:05 万一 阅读(3371) 评论(0) 推荐(0) 编辑
摘要: 绑定表达式中可以有简单的运算和字符串连接, 但字符串需放在双引号中.还可以使用 TBindingsList.Methods 提供的一组表达式函数(分别来自 System.Bindings.Methods 和 Data.Bind.EngExt 单元):ToStr()ToVariant()Round()Format()UpperCase()LowerCase()FormatDateTime()StrToDateTime()Max()Min()CheckedState()SelectedItem()SelectedText()示例: 用三个 TLabel 分别呈现窗体的宽度、高度、面积.现在窗体上添 阅读全文
posted @ 2011-10-02 18:25 万一 阅读(4001) 评论(8) 推荐(0) 编辑
上一页 1 ··· 13 14 15 16 17 18 19 20 21 ··· 215 下一页