delphi使用button读取ACCESS数据表
设置一个button控件可以从ACCESS数据库中选择数据表,并存放在listbox中,然后可以通过选择LISTBOX中的一个表格,显示在Groupbox中~~请写详细点...
设置一个button控件可以从ACCESS数据库中选择数据表,并存放在listbox中,然后可以通过选择LISTBOX中的一个表格,显示在Groupbox中~~
请写详细点~~不太了解delphi的 展开
请写详细点~~不太了解delphi的 展开
3个回答
展开全部
上边两个兄弟说的都对,建议你先学习基础,有了一定的基础功底,再学习数据库和网络。
你的要求就是下面的combobox和listbox的差别,问题都不大,都是TWinControl
SQLSTR:select name from sysobjects where xtype='u'
select:name
我给你一个我自己写的incombobox的过程,你需要的是表名,这个过程只需要控制sqlstr,就可以向combobox传入需要传入的数据。、
(
combobox,存放查询数据的容器。
SQLSTR,传入的SQL查询语句。
SELECT,需要存放在COMBOBOX的字段。
)
procedure TDM.incombobox(combobox: TComboBox; sqlstr, select: string);
begin
AdoQ.Close;
ADOQ.SQL.Clear;
ADOQ.SQL.Add(sqlstr);
ADOQ.Open;
adoq.First;
combobox.Items.Clear;
while not ADOQ.Eof do
begin
ComboBox.Items.Add(ADOQ.fieldbyname(select).AsString);
adoq.Next;
end;
ADOQ.Close;
combobox.Style := csDropDownList;
combobox.ItemIndex := 0;
end;
你的要求就是下面的combobox和listbox的差别,问题都不大,都是TWinControl
SQLSTR:select name from sysobjects where xtype='u'
select:name
我给你一个我自己写的incombobox的过程,你需要的是表名,这个过程只需要控制sqlstr,就可以向combobox传入需要传入的数据。、
(
combobox,存放查询数据的容器。
SQLSTR,传入的SQL查询语句。
SELECT,需要存放在COMBOBOX的字段。
)
procedure TDM.incombobox(combobox: TComboBox; sqlstr, select: string);
begin
AdoQ.Close;
ADOQ.SQL.Clear;
ADOQ.SQL.Add(sqlstr);
ADOQ.Open;
adoq.First;
combobox.Items.Clear;
while not ADOQ.Eof do
begin
ComboBox.Items.Add(ADOQ.fieldbyname(select).AsString);
adoq.Next;
end;
ADOQ.Close;
combobox.Style := csDropDownList;
combobox.ItemIndex := 0;
end;
展开全部
这个问题,可以用ADO实现,
我觉得你还是先看看DELPHI的基础教材。
我觉得你还是先看看DELPHI的基础教材。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
数据连接会吧,采用ADO(在DBGO里)连接。
加一个数据连接,用con1.GetTableNames(listbox.items,false)可以获得全部的数据表;
其它的自己做吧
加一个数据连接,用con1.GetTableNames(listbox.items,false)可以获得全部的数据表;
其它的自己做吧
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询