Помогите

[Kovalenko.lokal]

procedure TForm1.Button1Click(Sender: TObject);
begin
if
(LabeledEdit1.text='') or
(Labelededit2.text='')or
(LabeledEdit3.text='') then
MessageDlg ('Çàïîëíèòå âñå ïîëÿ!', mtWarning, [mbOK], 0)
else
with AdoTable1 do Begin
insert;
FindField('Name').AsString:=Labeled Edit1.Text;
FindField('1').AsString:=LabeledEdi t2.Text;
FindField('2').AsString:=LabeledEdi t3.Text;
Post;
end;

with Form1 do begin
LabeledEdit1.Text:='';
LabeledEdit2.Text:='';
LabeledEdit3.Text:='';


end;

end;

procedure TForm1.ADOTable1CalcFields(DataSet: TDataSet);
begin

Dbgrid1.Columns.Itog.Value:=(1.Valu e+2.Value);
end;

end.



сама процедура обработки (я немогу работать с Dbgrid1) как обращаться к полям напишите пожалуйста

[dron-s]

сама процедура обработки (я немогу работать с Dbgrid1) как обращаться к полям напишите пожалуйста

Query1.FieldByName('Name_Filed').As Value

[Kovalenko.lokal]

а без query никак нельзя????

[mihali4]

(я немогу работать с Dbgrid1) как обращаться к полям напишите пожалуйста

Оставьте в покое Dbgrid. Если вы не поняли с первого раза, я могу и повторить - Dbgrid сам ничего не вычисляет, не сортирует, не заносит, а умеет только лишь отображать те данные, которые находятся в связанном с ним датасете (в вашем случае это ADOTable).
И вы туда ничего никогда в жизни не занесете. Любые данные можно занести только в датасет (ADOTable).

а без query никак нельзя????

И опять-таки повторюсь - скачайте себе хотя бы книгу "100 компонентов Дельфи" с сайта клуба (уже надоело упоминать про ссылку внизу на каждой странице форума). И тогда поймете, что все делается аналогично - ADOTable.FieldByName...
Воспользуйтесь, в конце концов, богатым набором демо-программ, которые находятся на вашем компьютере в каталоге ...Borland\...Delphi7\Demos.
Вы там найдете образцы программ почти на все случаи из жизни начинающих...