问几个dbgrideh的问题

vbz001 2009-11-10 12:37:45
怎么取选中格的那一行的行号 或者取出选中格的那一行中的某一格的值

而且我想是写在双击某一行,弹出一个新窗口,而新窗口显示就是我所中的行的弹细结果

还有一个问题就是
用ADOQuery取值到DBgrideh中 为什么一直要Open,能不能把数据取出到dbgrideh后,就不占用数据库了

datasource1.DataSet:=adoquery1;
dbgrideh1.DataSource:=datasource1;
try
with adoquery1 do
begin
s:='sqlstr';
sql.Clear;
sql.Add(s)
open;
except
..
end;

最后一个就是能不能向数据库一条一条手动取数据填充到到DBgrideh中




...全文
181 10 打赏 收藏 转发到动态 举报
写回复
用AI写文章
10 条回复
切换为时间正序
请发表友善的回复…
发表回复
vbz001 2009-12-02
  • 打赏
  • 举报
回复
你的什么现在的例子 只有这一段吗
能写详细点吗
smile_ps 2009-11-13
  • 打赏
  • 举报
回复
if UpperCase(DBEh1.selectedField.FieldName) = UpperCase('aaa') then
begin
if ADOQUERY.FieldByName('aaa').AsInteger<=0 then exit;
From2 := TFrom2 .createdlg('aaa','','','','');
end;
smile_ps 2009-11-13
  • 打赏
  • 举报
回复
我这里有个现成的例子,双击统计报表中的某格得到相应的明细
kobaer 2009-11-12
  • 打赏
  • 举报
回复
第三点 是可以用内存表来实现的
xhj12077021 2009-11-12
  • 打赏
  • 举报
回复
根据这几位朋友的回复

lz研究下应该可以实现想要的结果
vbz001 2009-11-10
  • 打赏
  • 举报
回复
前面二点你们都解释了
差三四点

我补充一下第四点 就是我开始进行所有的录单,这时的单在数据库中
而我想在一个form中进行对分次把一些单列以单号进行查找后进行手动一条一条添加入一个dbgrideh或上面说的stringgrid中 这时就产生了分组在dbgrid中 我要把这些分好的处理后我会加一个flag作为已经分了组 update入数据库

所以我才提出了第四点 倒底用什么最为适合

第三点是我心中的一个疑问 就是为什么一直到要用open如我with..do end;加一个adoquery.closedbgrideh就没有数据了 为什么不能在本地产生一个本地表 缓存在本地 不用常open
de410 2009-11-10
  • 打赏
  • 举报
回复
1、行号 dbgrideh1.DataSource.DataSet.RecNo;
2、描述不清楚,你的数据表是明晰表,还只是一个表,需要单独把这条记录信息全部字段显示出来?
3、因为dbgrideh是数据感应组件,你可以用内存表来做;
4、那建议你用stringgrid来做了~~
MAJAPG 2009-11-10
  • 打赏
  • 举报
回复
怎么取选中格的那一行的行号
DBgrideh.DataSource.DataSet.RecNo;

选中格的那一行中的某一格的值
DBgrideh.DataSource.DataSet.FieldByName('字段名').AsString;

双击某一行,弹出一个新窗口,而新窗口显示就是我所中的行的弹细结果
在OnDbClick事件中写
//判断数据集状态后
form1 := Tform1.Create(Application);
form1.edit1.text := DBgrideh.DataSource.DataSet.FieldByName('字段名').AsString;
form1.ShowModal;
form1.Free;

DBgrideh是绑定数据集的。
DBgrideh设置readonly属性,
按向下箭头或就可以增加一行新纪录,或和DBNavigator配合使用。
shuaialang 2009-11-10
  • 打赏
  • 举报
回复


dbgrideh1.Fields[7].Text 选中行第七个字段的值

datamodule1.ADOQuery2.RecordCount就是dbgrideh的行数

DataModule1.ADOQuery1.FieldByName('F1').Text 就是dbgrideh选中行的某个字段的值


其他行都用adoquery来控制

vbz001 2009-11-10
  • 打赏
  • 举报
回复
难道大家都不用这个吗 还是分数少
分数我可以加 100都可以
只要能帮我解决问题

2,498

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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