delphi 中我用ADOConnect和ADODataSet、DBGrid、DataSource 如何获取选中行中的字段???
急急!~~谢谢!~~比如说a(xx,yy,cc)三个字段,对应的值有:aa,bb,fftt,ee,ww当我选中第一行时,可以把aa,bb,ff读出来或通过按钮点击复制到T...
急急!~~谢谢!~~
比如说a(xx,yy,cc)三个字段,对应的值有:aa,bb,ff tt,ee,ww 当我选中第一行时,可以把aa,bb,ff读出来或通过按钮点击复制到Tedit中!!
可不可以用一个按钮控制并读出所选行的值,且可以传到另一个窗体中!~~?? 展开
比如说a(xx,yy,cc)三个字段,对应的值有:aa,bb,ff tt,ee,ww 当我选中第一行时,可以把aa,bb,ff读出来或通过按钮点击复制到Tedit中!!
可不可以用一个按钮控制并读出所选行的值,且可以传到另一个窗体中!~~?? 展开
1个回答
展开全部
在DBGrid的Events的OnCellClick事件中写一下的代码:(userid.text就是edit.text,只是改了名字而已。ADO_user为ADOTable的名字;ADODataSet的用法应该差不多)
procedure TUserManageForm.DBGrid1CellClick(Column: TColumn);
begin
if ADO_user.Active then
begin
userid.Text := ADO_user.fieldbyname('userID').AsString;
username.Text := ADO_user.fieldbyname('userName').AsString;
key.Text := ADO_user.fieldbyname('password').AsString;
end;
end;
procedure TUserManageForm.DBGrid1CellClick(Column: TColumn);
begin
if ADO_user.Active then
begin
userid.Text := ADO_user.fieldbyname('userID').AsString;
username.Text := ADO_user.fieldbyname('userName').AsString;
key.Text := ADO_user.fieldbyname('password').AsString;
end;
end;
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询