[Yurk@]

Код:

T1.Open;
T2.Open;
T1.Edit;
T2.Edit;
T1.FieldByName('F1').asString:=DBEdit1.Text;
T2.FieldByName('F1').asString:=DBEdit1.Text;
T1.Post;
T2.Post;