分享
 
 
 

TValueListEditor 控件使用方法

王朝delphi·作者佚名  2006-01-31
窄屏简体版  字體: |||超大  

TValueListEditor 控件使用方法

CST 2005-07-19

1 文档目的

1.1 写作目的

本文简单介绍了TvalueListEditor控件的基本使用方法。可以使用该控件实现类似DELPHI中OBJECT INSPECTOR的功能。

1.2 备注

下文所有vle为一个TvalueListEditor对象。

2 简单操作

操作

代码

添加个属性编辑

InsertRow(Field,Value,Append);

删除一个属性

DeleteRow(RowIndex);

统计属性个数

RowCount;

获得激活的属性INDEX

Row

定位

根据KEYSTR定位,找到后的位置保存在INDEX中

FindRow(KeyStr,Index);

获得KEY的内容字符串

skey:=vle.Keys[vle.row];

修改/获得VALUE的内容字符串

vle.Values[key]:=txtvalue.Text;

属性值只读

Vle.ItemProp[I].ReadOnly:=True;

3 数据绑定形式

3.1 数据存储格式

TvalueListEditor的数据实体是保存在TvalueListEditor对象的Strings成员中,Strings成员是一个Tstring类型对象,通常以TstringList实现。

在TstringList中每个string必须以如下形式存储:

KeyStr=ValueStr

如果等号没有找到,整个string会被作为Value处理,此时Key为空。

修改GRID内容后,会影响到STRINGS的数据。

3.2 导入导出

TSTRING对象可以将数据导出,函数为:

SaveToFile和LoadFromFile

4 编辑样式设置

4.1 KEY字段的样式

KEY字段(属性名称)是4种显示样式的组合。

样式

介绍

KeyEdit

KEY列的内容也可以由用户修改

KeyAdd

用户可以添加一个属性

按INS键或者在最后条按DOWN

必须和KEYEDIT配合使用

KeyDelete

用户可以删除一个属性

按DEL键(未实现)

KeyUnique

禁止创建重复KEY的属性

vle.KeyOptions:=[keyUnique, keyEdit, keyAdd] ;

建议使用keyUnique样式,禁止创建重名的属性,便于根据KEY定位到值。

当创建重名属性时会raise一个Exception。

4.2 项目编辑方式

ItemProps.EditStyle属性决定了编辑的样式:普通,下拉列表,弹出窗口。

esSimple, esEllipsis, esPickList

4.2.1 下拉列表

先设置某项的ItemProps为esPickList,然后将一个TstringList对象赋值给ItemProps的PickList成员。该StringList将成为下拉列表中的选项内容。

ItemProps[I].EditStype:=esPickList;

ItemProps[i].PickList:=TStringList_Object;

其中参数I可以是KEY(STR)也可以是INDEX(INTEGER)。

4.2.2 普通编辑方式

使用Input Mask

ItemProps[I].EditStype:=esSimple;

ItemProps[i].Mask:=StrMaskCharacters;

MASK串的相应功能可以参考HELP。

4.2.3 使用弹出编辑器

ItemProps[i].EditStyle:=esEllipsis;

用户按下[…]按钮后会触发TvalueListEditor的OnEditButtonClick事件。我们可以在此前的OnClick时间中记录选中的行号:

strGlobalSelKey:=vle.Key(vle.Row);

在事件OnEditButtonClick 中判断要打开的编辑窗口。为VLE.STRING每个STRING维护一个TSTRINGLIST,记录编辑样式和弹出窗口ID。

1. 根据SWITCH判断要打开的编辑窗口

2. 将激活的KEY传递给编辑窗口

3. 编辑窗口完成编辑后将VLE.VALUE(KEY):=EditValue;保存返回。

(in FormMain Unit)

......

with FormEdit do

begin

key:=FormMain.skey;

Caption:='edit: '+skey ;

ShowModal ;

end;

......

(in FormEditing Unit)

......

formmain.vle.Values[key]:=txtvalue.Text;

self.Close;

......

5 可能会需要用到的一些类型转换函数

l StrToBool

l StrToDate/StrToDateTime

l StrToFloat

l StrToIntDef

6 小结

本文参考的DELPHI 6的帮助文档,并简单描述了TVALUELISTEDITOR的使用方法,研究此控件是为了在一个DELPHI项目中实现自定义控件的动态编辑。只要对该控件进行一层封装就可以被自定义的组件所调用。没有实现的功能为DELPHI中可以展开的项目。

可以到我的YAHOO公文包下载本文档的示例。

http://cn.briefcase.yahoo.com/iamcst

欢迎也很感谢大家给我提出宝贵意见。

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行,买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开?
 干货   2023-08-06
女子4年卖2套房花700多万做美容:不但没变美脸,面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号,网友:不要回答!
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人,苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制(强混乱强眩晕强睡眠)和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情:美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观:鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营:射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山:拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁:鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道:单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有