如何对动态添加进的空节点使其处在文字编辑状态,可以直接编辑节点显示的文字
解决方案 »
- 散分求教一个简单的数据库连接判断问题?谢谢
- 新手+菜鸟,请教关于取当天日期的问题
- fastreport分组问题
- DBExpress + MsSqlServer 的数据保存问题?
- 使用 TBatchMove 如何处理 bigint 类型字段?
- delphi5中QReport中的几乎所有控件突然消失,而且无法重新安装这些控件,怎办?
- Delphi xe2 如何实现电脑重启,这里找到的代码似乎都不行,老版本的行不通!!!!!!
- 如何实现登陆窗体的动态创建?
- 请帮帮:TClientDataSet.CommandText的update语句问题
- DirectDraw与DirectShow关于overlay的问题
- 一个小项目,征求合作者3-5名
- 有关进制转换的问题!急啊!!!
var
i:integer;
begin
for i := 0 to TreeView1.Items.Count - 1 do
begin
if TreeView1.Items.Item[i].Text = '22' then
TreeView1.Items.Item[i].EditText;
end;
end;
var
i:integer;
begin
TreeView1.Items.AddChild(nil,'11');
TreeView1.Items.AddChild(nil,'');
for i := 0 to TreeView1.Items.Count - 1 do
begin
if TreeView1.Items.Item[i].Text = '' then
TreeView1.Items.Item[i].EditText;
end;
end;