Re[2]: Таблицы...
От: sasa001  
Дата: 03.06.03 12:29
Оценка: :)
Здравствуйте, Karat, Вы писали:

K>Здравствуйте, sasa001, Вы писали:


S>>Имеются две таблицы — master и slave, связаны один ко многим. В первой таблице (таблица групп) ведутся записи по названиям групп. Во второй — по данным студентов. В таблице студентов вводятся данные по студентам (ФИО), оценки. Подсчитывается среднее арифметическое по оценкам. Если результат, например, 5, то студенту начисляется повышенная стипендия (установка поля student.Stip_100 в true). Как сделать так, чтобы при подсчете среднего арифметического по оценкам добавлялось значение поля stip в таблицу групп? (true — в группе есть студенты со стипендиями, false — нет студентов со стипендиями). Вся эта фигня нужна для более простого формирования отчетов.

S>>В общем, делаю так:

S>>procedure Tform2.DBGrid1EditButtonClick(Sender: TObject);

S>>begin
S>> if Form2.DBGrid1.SelectedIndex = 0 then
S>> begin
S>> Application.CreateForm(tForm5, Form5);
S>> if (T_gruppa.State in [dsBrowse, dsEdit]) then Form5.ShowModal;
S>> if Form5.ModalResult = mrOK then
S>> T_gruppa.Append
S>> else if Form5.ModalResult = mrYes then
S>> T_gruppa.Edit
S>> else if Form5.ModalResult = mrCancel then
S>> Exit;
S>> T_gruppaGruppa.Value := Form5.DBEdit1.Text;
S>> T_gruppa.Post;
S>> T_gruppa.Refresh;
S>> end;
S>> end;//if SelectedIndex

S>>Это при добавлении новой группы. Со студентами ситуация практически таже. Но как мне добавить данные в таблицу групп, если осуществляется работа с таблицей студентов?

S>>Не взыщите строго, на Делфи пишу меньше месяца=))


K>Если данные изменения дожны производиться во время установки student.Stip_100 в true, то напиши простейший триггер на изменение таблицы!


Только ведь триггер — это вроде как для распределенных приложений. У меня-то все на одном локальном компе...
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.