数据库是sql的,建好了一个表.例如: 字段名为:A 和 B然后值为A B
001 a
002 b
003 c
... .现在想用dbgrid来完成这样一个功能.[如果可以用其它组件,麻烦给说并给出代码]dbgrid 已经是设置好显示字段,即A B想在A字段名下的单元格,输入001 按回车[或单击按钮],对应001的 A 和 B 的值 就在dbgril输入的那行, 整行显示出来,即 显示 001 a 然后在第二行输入002或003 就在第二行显示对应的字段值,{即现在在dbgril显示是这样的, 第一行 001 a
第二行 002或003 b或c
..... ...
}依次类推. 请问要如何实现这种功能, 或者可以用其它组件或第三方组件的.麻烦告知并给出相关代码. 谢谢.
001 a
002 b
003 c
... .现在想用dbgrid来完成这样一个功能.[如果可以用其它组件,麻烦给说并给出代码]dbgrid 已经是设置好显示字段,即A B想在A字段名下的单元格,输入001 按回车[或单击按钮],对应001的 A 和 B 的值 就在dbgril输入的那行, 整行显示出来,即 显示 001 a 然后在第二行输入002或003 就在第二行显示对应的字段值,{即现在在dbgril显示是这样的, 第一行 001 a
第二行 002或003 b或c
..... ...
}依次类推. 请问要如何实现这种功能, 或者可以用其它组件或第三方组件的.麻烦告知并给出相关代码. 谢谢.
解决方案 »
- 读 表字段名称、类型、长度
- SendMessage到浏览器焦点输入框没有作用?
- delphi5中我设置了断点,怎么执行停不住啊?
- 使用wiseinstallation打包delphi7.0的bde程序,出现如下错误提示:指定了不正确的bde版本,请确定,本机当前配置bde的版本是5.0.1.22或更
- 我想在点最小化窗口后,将窗口最小化到任务栏,而不是桌面左下角,怎么做呀?
- 窗體的觸發事件?
- 散分!高手请进。Label及Panel透明度问题!
- 转换vc编译的DLL函数
- fexpands与fsplit这两个函数在什么unit中?
- 在Edit里敲回车,为何有“当当”的声音
- 求Sql脚本
- 从TBlobField里读出的数据,怎么样才能转化成某个类的实例?
然后在buttonEdit事件里面 onButtonclick 写代码
然后选中A字段 的属性 里面有个方法 设置下 onVilidate 事件里面写
//Query:TADOQUERY 查询那个表的 随便 select * from 表名
procedure TfrmNewProductSample.MasterSetNewProductIDValidate(
Sender: TField);//例子
begin
if Query.Local('a',sender.asintegr,[]) then
begin
Sender.Dateset.FieldByName('b').asstring := Query.fieldbyName('b').asstring;
end;
end;