on9.click;; TForm1.N16Click (Sender: TObject );. Button10.click;; TForm1.N17Click (Sender: TObject);. Button11.click;; TForm1.N18Click (Sender: TObject);. Button12.click;; TForm1.N22Click (Sender: TObject);. ShowModal; ; TForm1.N23Click (Sender: TObject);. showmodal;; TForm1.PageControl1Changing (Sender: TObject; AllowChange: Boolean); (button6.Visible = false) and (form1.SpisokS.DataSet <> form1.Query1) then
messagedlg ('Збережіть зміни на першій сторінці!', mtWarning, [mbOk], 0);
end; TForm1.FormActivate (Sender: TObject);. Label1.Caption: = form1.SpisokTfam.value + '' + form1.SpisokTName.value +
'' + form1.SpisokTOtch.value;. DBNavigator1.visible: = true;. Active: = true;; TForm1.N25Click (Sender: TObject);. button6.Click;. Button2.Click;; TForm1.N26Click (Sender: TObject);. button6.Click;. Button3.click;; TForm1.N19Click (Sender: TObject);. Button5.Click;; TForm1.DBGrid5KeyDown (Sender: TObject; var Key: Word;: TShiftState);. Button1.Enabled: = true;
end;
end.
