Как добавить, изменить, удалить, посмотреть запись в DBGrid?

procedure TDataModule1.TownTableBeforePost(DataSet: TDataSet);
begin
  if Application.MessageBox('Данные не сохранены. Сохранить?', 'Внимание!', MB_OKCANCEL) <> IDOK then
   begin
     DataModule1.TownTable.Cancel;
     Abort;
   end
  else
   begin
    DataModule1.TownTable.Post;
   end;
end;

procedure TTownBookForm.ChangeButtonClick(Sender: TObject);
var
 NameTown: String;
begin
repeat
  if not InputQuery('Редактирование', 'Введите новое название города:', NameTown) then
  begin
   ShowMessage('Действия отменено');
   Abort;   // Прекратитт цикл при отмене
  end;
 until NameTown <> '';   // пока не введут имя города
 
   DataModule1.Town_Table.Edit;   // Редактируем строку
   DataModule1.Town_Table.FieldByName('Город').AsString := NameTown;   // Добавляем название введеного города
end;

...
  NameTown:='Москва';
  if not InputQuery('Редактирование', 'Введите новое название города:', NameTown) then
...

  NameTown:= DataModule1.Town_Table.FieldByName('Город').AsString;
  if not InputQuery('Редактирование', 'Введите новое название города:', NameTown) then

 DataModule1.Town_Table.Post;

procedure TAddEditFormForm.SaveButtonClick(Sender: TObject);
begin
 if DataModule1.LudiTable.Modified then   // Если запись с людьми изменилась, тогда
    DataModule1.LudiTable.Post;   // сохранить
 if DataModule1.KontaktyTable.Modified then   // Если запись с контактами изменилась, тогда
    DataModule1.KontaktyTable.Post;   // сорханить
 Close;   // Закрыть форму ввода
end;