delphi中 怎么把 sql语句中的 值取出来 比如select cname form。。。。。
delphi中怎么把sql语句中的值取出来比如selectcnameform。。。。。比如说我想对cname值i进行处理将cname值赋给文本框或者表格。。代码格式是怎么...
delphi中 怎么把 sql语句中的 值取出来 比如select cname form。。。。。
比如说我想对cname值i进行处理 将cname值赋给文本框或者表格。。代码格式是怎么写 控件用的adoquery控件。。。。 cname值为多个 展开
比如说我想对cname值i进行处理 将cname值赋给文本框或者表格。。代码格式是怎么写 控件用的adoquery控件。。。。 cname值为多个 展开
2个回答
展开全部
虽然我不是学delphi的,但我知道大概
你要引用adodc控件。
我不知道delphi是如何引用adodc控件的,
我把VB如何引用adodc控件告诉你。
声明变量部分
Dim cn As New ADODB.Connection 'cn是变量
Dim rs As New ADODB.Recordset 'rs是变量
在加载部分
cn.Open SQL ‘SQL是连接数据源语法
然后在相应的事件里。
set rs=cn..Execute("select cname form。。。。。)
所以SQL里筛出来的值就在rs控件里了。
你就用循环访问rs控件吧
代码如下:
if rs.bof=false then
do while(rs.eof)
变量=rs.fiels(0) 第一条记录的第一个字段
rs.movenext
loop
你要引用adodc控件。
我不知道delphi是如何引用adodc控件的,
我把VB如何引用adodc控件告诉你。
声明变量部分
Dim cn As New ADODB.Connection 'cn是变量
Dim rs As New ADODB.Recordset 'rs是变量
在加载部分
cn.Open SQL ‘SQL是连接数据源语法
然后在相应的事件里。
set rs=cn..Execute("select cname form。。。。。)
所以SQL里筛出来的值就在rs控件里了。
你就用循环访问rs控件吧
代码如下:
if rs.bof=false then
do while(rs.eof)
变量=rs.fiels(0) 第一条记录的第一个字段
rs.movenext
loop
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
with ADOQuery1 do
begin
Close;
SQL.Clear;
SQL.Add('select cname from table1 t '); //无特定条件, 应有多条记录.
Open;
First: //第一条记录
Edit2.Text:= FieldByName('cname').AsString;
end;
with ADOQuery1 do
begin
Close;
SQL.Clear;
SQL.Add('select cname from table1 t '); //无特定条件, 应有多条记录.
Open;
while not EOF do
begin
ComboBox1.Items.Add(FieldByName('cname').AsString);
Next;
end;
如果给DBGrid的话, 用DBSet
begin
Close;
SQL.Clear;
SQL.Add('select cname from table1 t '); //无特定条件, 应有多条记录.
Open;
First: //第一条记录
Edit2.Text:= FieldByName('cname').AsString;
end;
with ADOQuery1 do
begin
Close;
SQL.Clear;
SQL.Add('select cname from table1 t '); //无特定条件, 应有多条记录.
Open;
while not EOF do
begin
ComboBox1.Items.Add(FieldByName('cname').AsString);
Next;
end;
如果给DBGrid的话, 用DBSet
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询