foe to do

[Re3oFFer]

Привет всем вот код:

procedure TForm3.Button2Click(Sender: TObject);
begin
with Form3.ADOQuery1 do
begin
  close;
  SQL.Clear;
  SQL.Add('Update otdel set otdel="'+ Edit1.Text +'"');
  SQL.Add(' where otdel = "' + ComboBox1.Text+'"');
  ExecSQL;
  SQL.Clear;
  SQL.Add('Select * from otdel');
  open;
  ComboBox1.Items.Clear;
  ComboBox1.Items.Append(ADOQuery1.FieldByName('otdel').AsString);
  ADOQuery1.Next;
   end;
    end;

на эту кнопку делается изменение данных в комбобох. Данные в комбобох подгружены через таблицу в бд. Когда я изменяю данные в комбобох, но они изменяются только после выключения приложение.И я тогда прописал вот этот код. А мне сказали вроде всё правильно но нужно весь код сделать через оператор for как это сделать ёмаё??? =)))

ComboBox1.Items.Clear;
  ComboBox1.Items.Append(ADOQuery1.FieldByName('otdel').AsString);
  ADOQuery1.Next;
   end;

________
Код нужно оформлять по правилам:
тегом [CODE]..[/СODE] (это кнопочка с решёточкой #)
Не забывайте об этом!
Модератор.

[denisbrain]

так у тебя вообще цикла нету,
примерно так, писал тут поэтому могут быть ошибки

var x:integer;
begin
listbox1.items.clear;
for x:=1 to table1.recordcout do begin
   table1.recno:=x;
listbox1.items.add(table1.fieldbyname('polename').asstring);
end;
end;

Table1=SQL
listbox1=Combobox1

[Re3oFFer]

Спасибо чувак что написал =))) но я уже разобрался =)