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

align="justify">: = Edt1.Text;

Form6.DBGrid1.DataSource.DataSet.FieldByName ('ГЋГІ Г· ГҐГ±ГІГўГ®'). AsString : = Edt2.Text;

Form6.DBGrid1.DataSource.DataSet.FieldByName ('Äîëæíîñòü'). AsString : = Edt3.Text;

Form6.DBGrid1.DataSource.DataSet.FieldByName ('Òåëåôîí'). AsString : = Edt4.Text;. DBGrid1.DataSource.DataSet.Post;; TForm8. btn2Click (Sender: TObject);. close;;.

unit Unit9;

var: TForm9; Unit2, Unit1, Unit10, Unit11, Unit12, Unit3, Unit4, Unit5, Unit6,, Unit8;

{$ R *. dfm} TForm9.Button1Click (Sender: TObject);. hide;. show;;.

unit Unit10;

var: TForm10; Unit5, Unit1, Unit11, Unit12, Unit2, Unit3, Unit4, Unit6, Unit7,, Unit9, Unit14;

{$ R *. dfm} TForm10.Button1Click (Sender: TObject);. close;; TForm10.Button2Click (Sender: TObject);. showmodal;;.

unit Unit11;

var: TForm11; Unit5, Unit1, Unit10, Unit12, Unit2, Unit3, Unit4, Unit6, Unit7,, Unit9, Unit16;

{$ R *. dfm} TForm11.Button1Click (Sender: TObject);. close;; TForm11.Button2Click (Sender: TObject);. showmodal;;.

unit Unit12;

var: TForm12; Unit5, Unit1, Unit10, Unit11, Unit2, Unit3, Unit4, Unit6, Unit7,, Unit9, Unit15;

{$ R *. dfm} TForm12.Button1Click (Sender: TObject);. close;; TForm12.Button2Click (Sender: TObject);. showmodal;;.

unit Unit13;

var: TForm13; Unit7;

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

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

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

Form7.DBGrid1.DataSource.DataSet.FieldByName ('òåëåôîí'). AsString : = Edit4.Text;. DBGrid1.DataSour ce.DataSet.FieldByName ('äîëæíîñòü'). AsString : = Edit5.Text;. DBGrid1.DataSource.DataSet.Post;; TForm13.Button2Click (Sender: TObject);. close;;.

unit Unit14;

var: TForm14; Unit10;

{$ R *. dfm} TForm14.Button1Click (Sender: TObject);....