Реферат АРМ заступник директора з наукової роботи

close;; TForm14.Button2Click (Sender: TObject);. DBGrid1.DataSource.DataSet.Insert;

Form10.DBGrid1.DataSource.DataSet.FieldByName ('Ôàìèëèÿ'). AsString : = Edit1.Text;

Form10.DBGrid1.DataSource.DataSet.FieldByName ('èìÿ'). AsString : = Edit2.Text;

Form10.DBGrid1.DataSource.DataSet.FieldByName ('îò ÷ åñòâî'). AsString : = Edit3.Text;

Form10.DBGrid1.DataSource.DataSet.FieldByName ('òåëåôîí'). AsString : = Edit4.Text;. DBGrid1.D ataSource.DataSet.FieldByName ('äîëæíîñòü'). AsString : = Edit5.Text;. DBGrid1.DataSource.DataSet.Post;;.

unit Unit15;

var: TForm15; Unit6, Unit12;

{$ R *. dfm} TForm15.Button1Click (Sender: TObject);. DBGrid1.DataSource.DataSet.Insert;

Form12.DBGrid1.DataSource.DataSet.FieldByName ('òåêñò çàäà ÷ è'). AsString : = Edit1.Text;. DBGrid1.DataSource.DataSet.Post;; TForm15.Button2Click (Sender: TObject);. close;;.

unit Unit16;

var: TForm16; Unit11;

{$ R *. dfm} TForm16.Button2Click (Sender: TObject);. close;; TForm16.Button1Click (Sender: TObject);. DBGrid1.DataSource.DataSet.Insert;

: = Edit1.Text;

Form11.DBGrid1.DataSource.DataSet.FieldByName ('Òåëåôîí'). AsString : = Edit2.Text;. DBGrid1.DataSource.DataSet.Post;; ..