如何读取adoquery1里的数据,二维的。
比如第3行,第4列,用什么属性?
或者有这样的问题:
已经 with Fm_FDM.ADOQuery1 do
begin
SQL.Clear;
SQL.Add('select Rtrim(a.USER_name) as 用户名');
SQL.Add(' from WM_USERS a');
Active:=True;
Open;
end; 得到一个列,“用户名”,如何写到Combobox中。
比如第3行,第4列,用什么属性?
或者有这样的问题:
已经 with Fm_FDM.ADOQuery1 do
begin
SQL.Clear;
SQL.Add('select Rtrim(a.USER_name) as 用户名');
SQL.Add(' from WM_USERS a');
Active:=True;
Open;
end; 得到一个列,“用户名”,如何写到Combobox中。
解决方案 »
- 动态创建treeview该怎么触发根结点的事件???
- 开发过主细表的大侠过来看看
- 扫描仪的应用问题。。
- delphi初學者提問
- 关于动态创建计算字段!200分进者有分
- 谁有DELPHI5的ADO升级软件,去掉EOF或BOF为真那个错误的。以及企业版的SN是什么?
- 如何实现自定义工具栏?
- 各位,我用select * from i:\mis\dt.dbf where rq='200204'出错,调试时发现query1.text为select * from i? where rq='200204'?在线等
- 在DELPHI中关于网络方面问题?
- 怎样实现记事本里的查找下一个的功能?
- 菜鸟第2问:关于frame的滚动条
- 武汉急招delphi程序员(专兼职均可)
比如第3行,第4列,用什么属性? 什么意思??
你查询的就USER_name这一列,那来的4列??
已经 with Fm_FDM.ADOQuery1 do
begin
SQL.Clear;
SQL.Add('select Rtrim(a.USER_name) as 用户名,a.user_password as 口令');
SQL.Add(' from WM_USERS a');
Active:=True;
Open;
end; 不就是2个列了吗?我是求教通用的解决方法,只是举个例子,至于是1列,还是多列,都有可能的。就是问,如何如何读取adoquery1里的数据。不用管有几行几列。
if (Strtoint(Edit2.Text)>adoquery1.RecordCount) or(Strtoint(Edit2.Text)=0) then exit;ADOQuery1.RecNo:=strToint(Edit2.Text);
Combobox.Items.add(adoquery1.Fields[strToint(Edit1.Text)-1].AsString);
procedure TForm1.Button1Click(Sender: TObject);
begin
with Fm_FDM.ADOQuery1 do begin
SQL.Clear;
SQL.Add('select Rtrim(a.USER_name) as 用户名,a.user_password as 口令');
SQL.Add(' from WM_USERS a');
Open;
ComboBox1.Items.Clear;
while not eof do begin
ComboBox1.Items.Add(FieldValues['用户名']);
next;
end;
end;end;
procedure TForm1.Button1Click(Sender: TObject);
begin
with Fm_FDM.ADOQuery1 do
begin
SQL.Clear;
SQL.Add('select Rtrim(a.USER_name) as 用户名,a.user_password as 口令');
SQL.Add(' from WM_USERS a');
Open;
end; ComboBox1.Items.Clear; while not eof do
begin
ComboBox1.Items.Add(ADOQuery1.FieldByName('用户名').AsString);
next;
end;
end;end;
combobox1.items.clear;//先清空组合框里的itemswhile not eof do //循环遍历
begin
combobox1.items.add(fieldbyname('用户名').asstring);
next;
end;
while not eof do //循环遍历
begin
combobox1.items.add(fieldbyname('用户名').asstring);
next;
end;