1。估计取记录的循环有问题。 2。用 if trim(QUery.FieldByname().asString)<>'' then beign ListbOx.Items.add(Query.FieldByName().asString); end;
Query1.Close; Query1.SQL.Text:='Select distinct AField from yourtbl'; Query1.Open; ComboBox1.Items.Clear; while not Query1.Eof do begin ComboBox1.Items.Add(Query1.Fields[0].AsString); Query1.Next; end;
去COMBOBOX里空格item的代码,不仅仅限于数据库的for i:=0 to combobox1.Items.Count-1 do begin if trim(Combobox1.Items.Strings[i])='' then combobox1.Items.Delete(i); end;
就是记录不连贯不明白吗?
比如说,
我往数据库中添加了001,002,003三条记录!
COMBOBOX显示的记录应该是
001
002
003
可结果它显示的是
001002003
明白吗?
我的问题是如何能将空格去掉!
2 combobox显示的字段是否允许为空?是不是那个记录该字段真的为空值。
自己查查吧!
记得下次要先贴代码?
2。用
if trim(QUery.FieldByname().asString)<>'' then
beign
ListbOx.Items.add(Query.FieldByName().asString);
end;
Query1.SQL.Text:='Select distinct AField from yourtbl';
Query1.Open;
ComboBox1.Items.Clear;
while not Query1.Eof do
begin
ComboBox1.Items.Add(Query1.Fields[0].AsString);
Query1.Next;
end;
begin
if trim(Combobox1.Items.Strings[i])='' then
combobox1.Items.Delete(i);
end;