如果要把SQL SEVER里面的数据库全部弄进delphi 的COMBOBOX 中,怎么弄
usemasterselect*fromsysdatabaseswheredbid>4这个是找SQL里面有几个用户自定义数据库的,我想把找到的这几个放到COMBOBOX中...
use master
select * from sysdatabases
where dbid>4
这个是找SQL里面有几个用户自定义数据库的,
我想把找到的这几个放到COMBOBOX 中,这样子应该怎么写delphi的代码?
谢谢了!!! 展开
select * from sysdatabases
where dbid>4
这个是找SQL里面有几个用户自定义数据库的,
我想把找到的这几个放到COMBOBOX 中,这样子应该怎么写delphi的代码?
谢谢了!!! 展开
3个回答
展开全部
已经查询出来了就好办了。
在delphi中拖一个TAdoQuery控件到窗体,
设置好数据库连接;(AdoQuery.ConnectionString);
然后ADOQuery.Sql.Text := '你的查询语句';//就是你上面写的那些;
AdoQuery.Open;
if AdoQuery.RecordCount > 0 then //如果有数据就直接添加就好
for i:= 0 to AdoQuery.RecordCount -1 do
Combobox.Items.add(AdoQuery.Fields[0].asString);
完了.
在delphi中拖一个TAdoQuery控件到窗体,
设置好数据库连接;(AdoQuery.ConnectionString);
然后ADOQuery.Sql.Text := '你的查询语句';//就是你上面写的那些;
AdoQuery.Open;
if AdoQuery.RecordCount > 0 then //如果有数据就直接添加就好
for i:= 0 to AdoQuery.RecordCount -1 do
Combobox.Items.add(AdoQuery.Fields[0].asString);
完了.
追问
这个是不是需要QUERY移动的啊?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
我还没见过像你这样用语句的呢,看起来像Foxpro下的用法。给个例子你吧,看了就知道怎么用Delphi取数据了。Delphi 7环境下的例子。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
combobox.clear;
while not adoquery1 .eof do
begin
combobox.items.add(adoquery1.fieldbyname('name').asstring);
adoquery1.next;
end
while not adoquery1 .eof do
begin
combobox.items.add(adoquery1.fieldbyname('name').asstring);
adoquery1.next;
end
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询