TListView 中Item项Caption重命名时字符长度限制问题

Mr.Chronos 2011-05-10 03:23:08

目前用TListView实现了一个类似Windows资源管理器的东西。但是对其中的文件或文件夹在实现重命名时遇到了问题。
Windows的机制是在重命名时如果超过了一定长度后，则无法输入字符了。在我的程序中，应该如何实现类似的功能呢？
如果使用TListView的OnEdited事件的话，只能在输入完成后检查长度。

问题的焦点在于，如何在命名过程中，也就是在输入字符的同时实时检查字符长度，如果超过，则无法进行输入操作了。

查了很久资料，没有头绪，故来此求教。望大侠们不吝赐教。不甚感激。。。

...全文

89 6 打赏收藏转发到动态举报

写回复

6 条回复

切换为时间正序

请发表友善的回复…

发表回复

Mr.Chronos 2011-05-11

打赏
举报

回复

谢谢My_Love, 问题完美解决，非常感谢

My_Love 2011-05-10

打赏
举报

回复

=〉LVM_GETEDITCONTROL 和 EM_SETLIMITTEXT

My_Love 2011-05-10

打赏
举报

回复

EnumChildWindows 和 EM_SETLIMITTEXT

hyz_cs 2011-05-10

打赏
举报

回复

他的意思是要自己来定长度.

CppFile 2011-05-10

打赏
举报

回复

在listview 中，也和windows一样的，超过了长度了，输入就没反应了，不需要你做额外的事情

My_Love 2011-05-10

打赏
举报

回复

实际测试Xp-SP3和BCB6的TListView的Caption长度限制是一致的259个！

TListView的Item条一般是由系统自画的，但电驴就实现了自画，使之看起来很漂亮，我们用DELPHI也可以实现！

Delphi 向TListView组件中添加项目，实现的功能相信大家还是挺熟悉的，比如Windows中更改成图标查看方式时的内容列表，图标排列的风格，在本例子中，是使用Delphi7.0中的TListView控件来实现，具体还是很方便的：　　procedure TForm1.SpeedButton1Click(Sender: TObject); 　　var 　　 myitem:TListItem; 　　 i : integer; 　　begin 　　 MyItem:=ListView1.Items.Add; //添加一列表项　　 MyItem.Caption:='MingriSoft'; //添加的列表项标题　　 MyItem.ImageIndex:=0; //添加的列表项的图标编号　　end; 　　end.

如何在點選 TListView 的checkbox 的同時得知點到的是哪一個 ITEM

BCB6中，TListView各种应用代码小结

Delphi在TListView中显示数据库，ListView控件的简单用法，在日常的编程开发中，这个比较常用。　　self.ListView1.ViewStyle:=vsReport; 　　for i:=0 to Query1.FieldCount-1 do 　　begin 　　 TempColumn:=self.ListView1.Columns.Add; 　　 TempColumn.Caption:=Query1.Fields[i].FieldName; 　　end; 　　Query1.First; 　　while not Query1.Eof do 　　begin 　　

VCL组件使用和开发

604

社区成员

13,459

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章