我用下面的方法取出dxdbtreeview1中所有选择项的值有问题么?我取出来的值始终不对,怎么回事?
用同样的方法在dxdbgrid中取值就是正确的啊。var
I: Integer;
mkTemp: TBookMark;
begin
for I := 0 to dxdbtreeview1.SelectedCount - 1 do
begin
mkTemp := TBookMark(dxdbtreeview1.SelectedRows[I]);
DataModule1.ADOTreeview.GotoBook(mkTemp);
end;
end;
用同样的方法在dxdbgrid中取值就是正确的啊。var
I: Integer;
mkTemp: TBookMark;
begin
for I := 0 to dxdbtreeview1.SelectedCount - 1 do
begin
mkTemp := TBookMark(dxdbtreeview1.SelectedRows[I]);
DataModule1.ADOTreeview.GotoBook(mkTemp);
end;
end;
解决方案 »
- 祝D版的朋友新春快乐,合家幸福,牛年大吉
- 为何查询的结果顺序与数据库中不一致
- 关于dll的问题
- 大家看看,这是不是delphi的bug? up有分
- 请问各位怎样在SQL Server数据库中保存JPG图形?
- 请问delphi7里用什么打印预览控件?
- 请问try......except..为什么捕捉不到记录的主键值重复的异常?形式如内。
- 物价飞涨,拜托各位程序员找工作时把工资开高点,别把行情搞坏了,对大家没好处
- delphi客户端有没对应ASP.NET的HTTPContext的
- =============一个关于数据库的莫名其妙的问题===================
- 2个名词解析
- 如何屏蔽在edit组件中按回车会发出DINGDING的声音
procedure TForm1.Button5Click(Sender: TObject);
begin
if dxdbtreeview1.SelectedRows.Count > 0 then
begin
with dxdbtreeview1.DataSource.DataSet do
begin
for i := 0 to dxdbtreeview1.SelectedRows.Count-1 do
begin
GotoBook(Pointer(dxdbtreeview1.SelectedRows.Items[i]));
listbox1.Items.Add(fields[0].AsString);
end;
end;
end
end;
不好意思哦
在dxdbtreelist里,楼上的代码不适用哦