Не отображает данные в ДБ Гриде

[EHLIB]

Записи добляет а потом пишет ощібку CommandTEXT и поля пустые помогите плз....

if (edit1.Text = '') or (edit2.Text = '') then showMessage ('Заполните  все поля!!!')
 else
begin
   with ADOQuery1 do
ADOQuery1.Active:= True;
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('INSERT INTO prixod (summa, opus, vrem) VALUES ('''+Edit1.Text+''', ''' +Edit2.Text+''', '''+datetostr(date)+ ''')');
ADOQuery1.ExecSQL;
ADOQuery1.Active:= True;
Edit1.Text:='';
Edit2.Text:='';
end;
end;
end.

[Serge_Bliznykov]

потому как Вы совершаете типичную для новичка ошибку - путаете Query, которые возвращают набор данных с теми запросами, которые изменяют данные.

думаю, что Вы хотели написать так:

if (edit1.Text = '') or (edit2.Text = '') then showMessage ('Заполните все поля!!!')
 else
 begin
      ADOQuery1.Active:= True;
      ADOQuery1.Close;
      ADOQuery1.SQL.Clear;
      ADOQuery1.SQL.Add('INSERT INTO prixod (summa, opus, vrem) VALUES   ('''+Edit1.Text+''', ''' +Edit2.Text+''', '''+datetostr(date)+ ''')');
      ADOQuery1.ExecSQL;
      ADOQuery1.SQL.Clear;
      ADOQuery1.SQL.Add('select summa, opus, vrem from prixod');
      ADOQuery1.Active:= True;
      Edit1.Text:='';
      Edit2.Text:='';
 end;
 end.

хотя, я бы крайне настойчиво рекомендовал Вам сделать следующее:
добавить на форму ещё один TADOQuery, в него занести запрос с параметрами (это особенно важно для правильно записи даты!)
и для добавления данных использовать именно его.
А для отображения использовать ваш изначальный AdoQuery1...