我想让节点只能输入30个字符,不知道如何实现?在线等。
解决方案 »
- 关于获得远程机器的IP问题!
- 关于主从表!
- 控件编写:想在Width或者Height变化后执行一些功能,怎么实现?
- 强行关闭串口
- 请问如何读写二进制文件? 保证快速结贴!!!
- 如何判定一个字符串中某个位置的字符是不是汉字?
- 请教:如何实现A3试卷的排版功能?
- 请问borland pascal for windows的最高版本是多少?在哪里可以下载?
- 大富翁是不是今天被黑掉了。
- FmWelcome:=TFmWelcome.Create(nil);这样写有什么用,与Application.CreateForm(TFmWelcome, FmWelcome)有什么区别
- 用Http做网络连接数据库的问题?
- 请教 VCL 源码分析
procedure TSVRaddsp.TreeView1Edited(Sender: TObject; Node: TTreeNode;
var S: String);
begin
if length(S)<=30 then
begin
TreeUtil.ModifyNodeCaption(S, Node); //修改Node的文本
TreeView1.OnChange(Sender,node);//当修改了节点值时,自动调用此过程。重新读取节点值
end
else //还原到上次的输入(就是这里不会写了。)
end;
var S: String);
begin
if length(s)>30 then
s:=node.text
end;
var AllowEdit: Boolean);
begin
SendMessage(TreeView_GetEditControl(TTreeView(Sender).Handle),
EM_LIMITTEXT, 30, 0);
end;