我设置TTreeView的MultiSelect属性为True,既可以选择几项,但我不知道如何得到我选的那几个节点.注意:我是在同一层下选择.
高压区
|
|_61
|_62
如何得到61,62
高压区
|
|_61
|_62
如何得到61,62
解决方案 »
- 请问如何把一个treeview里的数据导入到access数据库?
- 控制安装过后,怎么调用呢。偶以前从没有用过。(在线等待!)
- 菜鸟问题!得分容易
- FastReport2.5 分栏错位
- QuitReport窗体没有close事件?
- delphi中怎么设置dbgrid中显示数据的格式?
- 将很长的字符串(含中文等各种字符)加密存到ACCESS数据库字段,还要对此字段进行模糊查询,还要解密显示,近10W条数据,请问如何实现???谢谢!!!
- VCL能不能给DLL用
- 曾经用过VB么?
- ZwQueryInformationThread 如何使用呢?
- Delphi中有没有能在自己的程序中打开Word文档(Text也要)和Excel文件的控件?
- DbGrid里怎么加入CHECKBOX
var
mytext : TextFile;
i , Numb : integer;
begin
Numb:=ListView1.Items.Count; if Numb=0 then
begin
Application.MessageBox('没有要保存的更新配置','提示',mb_OK or mb_ICONWarning);
Exit;
end; assignFile(mytext,PathName+'UpFile.lit');
rewrite(mytext);
for i:=0 to Numb-1 do
begin
Writeln(Mytext,ListView1.Items[i].Caption);
Writeln(Mytext,ListView1.Items[i].SubItems.Text);
end; Closefile(mytext);
end;不知道谁有更好的办法。
i:integer;
begin
for i:=0 to treeview1.SelectionCount-1 do
begin
memo1.Lines.Add(treeview1.Selections[i].Text);
end;
vIndex : Integer;
begin
for vIndex := 0 to TreeView1.Items.Count - 1 do
if TreeView1.Items[vIndex].Level = 1 then
ShowMessaeg(TreeView1.Items[vIndex].Text);
MultiSelect属性为True