gbrsxxtjquery_1.Close;
gbrsxxtjquery_1.SQL.Clear ;
gbrsxxtjquery_1.sql.add('select distinct rydm from m_jbqk ');
gbrsxxtjquery_1.Open;
combobox1.Clear ;
with gbrsxxtjquery_1 do
begin
first;
while not (gbrsxxtjquery_1.Eof ) do
begin
combobox1.Items.Add(fieldbyname('rydm').asstring);
Next;
end;
end;
为什么当requerylive=true是错误的?
为什么?
gbrsxxtjquery_1.SQL.Clear ;
gbrsxxtjquery_1.sql.add('select distinct rydm from m_jbqk ');
gbrsxxtjquery_1.Open;
combobox1.Clear ;
with gbrsxxtjquery_1 do
begin
first;
while not (gbrsxxtjquery_1.Eof ) do
begin
combobox1.Items.Add(fieldbyname('rydm').asstring);
Next;
end;
end;
为什么当requerylive=true是错误的?
为什么?
//Query1.RequeryLive在设计时设为true;
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('select * from office');
Query1.Open;
while not Query1.Eof do
begin
ComboBox1.Items.Add(Query1.Fields[0].AsString);
Query1.Next;
end;