|
В сабформе 1 делаем функцию, возвращающую Item с кодом:
GetItem
Exit(Rec)
В основной форме в OnPush кнопки пишем код:
myItem := CurrForm.Subform1Name.FORM.GetItem;
Subform1Name - это название первой сабформы, которое нужно присвоить.
И дальше делаем вставку в таблицу xxx данных из myItem.
Затем апдейтим сабформу 2.
|