EOleException 'Ошибка синтаксиса в предложении FROM'

[XATAB]

База MS Access, пишу данный код

  na:= Edit1.Text;
  me:= Edit5.Text;
  dl:= Edit2.Text;
  pl:= Edit3.Text;
  go:= Edit4.Text;

  if Button1.Caption='Добавить' then
  begin
    zapros:='INSERT INTO reki_mira (nazvanie, dlina, ploshad_basseina, godovoy_stok, mesto_vpadeniya) VALUES("'+na+'", '+dl+', '+pl+', '+go+', "'+me+'")';
    ShowMessage(zapros); 
    Form1.ADOQuery1.SQL.Add(zapros);
    Form1.DataSource1.DataSet := Form1.ADOQuery1;
    Form1.DBGrid1.DataSource := Form1.DataSource1;
    Form1.ADOQuery1.Open;

и выдает ошибку. Помогите плиз, срочно надо.

[vovk]

не

    Form1.ADOQuery1.Open;

а

    Form1.ADOQuery1.ExecSQL;

[XATAB]

 Form1.ADOQuery1.ExecSQL;

не работает так (((

[XATAB]

и еще вопрос:
как в поле nomer найти максимально значение и присвоить его переменной posl_nomer?

[vovk]

Select max(nomer) from <имя таблицы>

?

zapros:='INSERT INTO reki_mira (nazvanie, dlina, ploshad_basseina, godovoy_stok, mesto_vpadeniya) VALUES('+quotedstr(na)+', '+dl+', '+pl+', '+go+', '+quotedstr(me)+')';
    ShowMessage(zapros); 
    Form1.ADOQuery1.SQL.text:=zapros;
    Form1.ADOQuery1.ExecSql;
    
    Form1.DataSource1.DataSet := Form1.ADOQuery1;
    Form1.DBGrid1.DataSource := Form1.DataSource1;

А что не работает? ошибку выдаёт? или просто запрос не добавляет записи. Если ошибку то скажите какая ошибка.

[XATAB]

ВО )))) теперь все работает, СПАСИБО