Показать сообщение отдельно
  #2  
Старый 30.01.2009, 18:31
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,015
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Делается элементарно запросом:

Код:
SELECT name, place1 + place2 + place3 + place4 as place_sum from таблица

Используется компонент TQuery. Это если только показать.
Если просто надо обновить, то запрос немного другой:

Код:
UPDATE таблица T1 SET placeobsch = (SELECT place1 + place2 + place3 + place4 FROM таблица T2 where T2.name = T1.name)

Должно сработать.

Если хочешь рукми, то тоже все просто:
Допустим, что открыли таблицу через TTable:
Код:
With Table1 Do
  Begin
    First;
    While Not EOF Do
      Begin
        Edit;
        FieldByName('placeobsch').AsInteger :=  FieldByName('place1').AsInteger + FieldByName('place2').AsInteger + FieldByName('place2').AsInteger + FieldByName('place3').AsInteger;
        Post;
        Next;
      End;
  End;
Ответить с цитированием