что это за ошибка?

[maladoy]

мне тут delphi 2007 ошибку выдал а почему я понять не могу!!! на delphi 7 все было ок!!!

[Google[Bot]]

А код можно на котором она выскакивает?

[maladoy]

Сообщение от Google[Bot]

А код можно на котором она выскакивает?

procedure TForm1.FormCreate(Sender: TObject);
begin

  While not ADOQ_day.Eof do
    begin
      DBCb_days.Items.Add(ADOQ_day.FieldByName('name_days').AsString);
      ADOQ_day.Next;
    end;
  While not ADOQ_group.Eof do
    begin
      DBComboBox1.Items.Add( ADOQ_group.FieldByName('name_group').AsString);
      ADOQ_group.Next;
    end;
  label3.Visible:=false;
  StringGrid1.Visible:=false;
end;

на сколько я понимаю тут!!!!
з.ы. х.з. что это за ошибка но она ушла!!!!!!:))))