本人使用dbcombobox与数据表中的某个字段连接,我使用的方法是procedure TForm1.FormCreate(Sender: TObject);
var I:integer;
begin
if Query1.Active then
Query1.Active :=false;//数据库中某张的表的某一列的查询;
Query1.Active :=true;
Query1.First;
while not Query1.Eof do
begin
DBComboBox1.Items.Add(Query1.FieldByName('品牌').AsString );
Query1.Next;
end;end;end.现在的问题是在dbcombobox中已经将品牌字段的所有内容加如了,但是不能进行条目的选取和显示,比如我要换一个条目在dbcombobox中没有显示,也不改变.为什么?
var I:integer;
begin
if Query1.Active then
Query1.Active :=false;//数据库中某张的表的某一列的查询;
Query1.Active :=true;
Query1.First;
while not Query1.Eof do
begin
DBComboBox1.Items.Add(Query1.FieldByName('品牌').AsString );
Query1.Next;
end;end;end.现在的问题是在dbcombobox中已经将品牌字段的所有内容加如了,但是不能进行条目的选取和显示,比如我要换一个条目在dbcombobox中没有显示,也不改变.为什么?
解决方案 »
- 【决战南非】世界杯只剩最后4场,押宝从速
- 【散分】大家用Delphi几年了,讲一下自己最拿手的技术!
- 请教高手一个算法问题,想了一晚上都没有想出来,头痛死了。
- 关于强制类型转换的问题。
- 请指教,大家请进!(在线等候大家!)
- 关于lookupfield字段的问题,分不够再加
- 80分,哪里有可用的最新的Install Shield下载?
- 为什么access中,添加记录给排在最后,而不是按我设的主键进行排序,关闭后,再打开,才能看到记录已按主键排序?参与者有分。
- 用回车输入跳到下一个控件
- 我想让TmyEdit在输入10个汉字后自动向父窗口发消息能做到吗?
- 寻找DELPHI高手QQ群。
- 请问如何获得局域网内所有机器名或IP地址,并群发消息,谢谢
在用用你的
Query1.First;
while not Query1.Eof do
begin
DBComboBox1.Items.Add(Query1.FieldByName('品牌').AsString );
Query1.Next;
end;end; 就可以了