ValueListEditor组件应用实例.docVIP

ValueListEditor组件应用实例（一） 分类： C++Builder/Delphi 2007-05-18 01:14 2025人阅读 评论(0) 收藏 举报 ?????? ?昨晚帮小宇做日程提醒系统的备忘列表显示模块。想了许久决定用ValueListEditor控件来显示，本人是个菜鸟，以前从未用过该控件。一些基本操作容易实现，但当获得当前焦点的行号时遇到了麻烦。在网上查了一下，对该功能的实现也是说的很模糊。仔细研究了一下，其实很简单，现在将该模块的编写过程贴出来和大家分享一下，很菜，望大虾不要取笑~-~。整个系统界面如下： ?????? 主要是实现从ini文件中读入数据到ValueListEditor、点击删除按钮将选择的行删除掉，同时将对应的数据从ini文件中删除、再对ini文件中的内容按一定规则重新排序的功能。 ????? 现在开始： ???? 首先建一个bcb工程，将form的caption属性设置为“备忘列表”。在form中拖入additional组件组中的ValueListEditor组件，设置他的align属性为alTop，使之与form的顶端对齐，向下调整大小，留下一部分区域给button。打开form的Borderlcons属性列表，设置biMaximize属性为false。这一步的 用途是使得form的最大化按钮不可用，使其不能最大化。赫赫。。也是为了窗体做出来好看些~-~。拖入两个button，分别命名为“删除”、“退出”。 ???? 然后设置ValueListEditor1的属性： ??? 1、点击Strings属性的按钮，出现value list editor框，点击code editor按钮，这是设置ValueListEditor1能存放的行数的。一直按enter键直到100行，说明该ValueListEditor1能存放100行数据。保存一下。??? 2、点击TitleCaptions属性的按钮，出现string list editor框，这是改变显示项名称的，我们将key值改变为“时间“，将value值改变为“待办事项“，点击ok保存。??? 3、点击Options属性，将其展开。在这里我们要设置的有两个数性：goEditing属性，这是设置“待办事项”栏可不可编辑的，因为我们只需显示数据，所以设置为false。goDrawFocusSelected属性，这是设置能否获得焦点即能否用鼠标选中某一行的，在此设置为true。??? 我们要从ini文件中读取数据，先建一个空的ini文件，命名为“MYINI.INI”。 ??? 好的，先到这里，准备工作已经完成。 ?????? 在上一将的基础上，?接下来就可以编写button的响应事件了。 ????? 双击“删除”按钮进入响应事件的编写。????? 整个“删除”按钮的代码如下，水平有限，这里我就不用仔细解释了。 void __fastcall TForm2::Button1Click(TObject *Sender){? int row;?? //记录当前焦点的行号? //获得焦点? ValueListEditor1-EditorMode = true;? ValueListEditor1-SetFocus();? //获得焦点行号? row=ValueListEditor1-Row ;? //删除该行? ValueListEditor1-DeleteRow(row);? //自定义函数，用来将ini文件的对应的数据项的值设置为空即删除该项的数据，并依次将数据前移? update(row);} ??? 然后我们再编写自定义函数update：??? 在上面button1响应函数的前面添加update函数如下： void update(int drow){???? AnsiString n1;???? int i,j,j1,num;???? //下面是对ini文件的操作???? TIniFile * regKey;???? AnsiString ExePath = ExtractFilePath(ParamStr(0));???? regKey = new TIniFile ( ExePath + MYINI.INI);???? //读 TB 的value值，是用来保存文件有多少数据项的???? n1=regKey-ReadString ( TB, value, );???? num= StrToInt(n1);?? //将string转换为int型???? //下面的循环是读取ini文件中从第drow个数据项依次付给前一个，drow是所删除的数据项所在的位置???? for(i=drow