fik.Close; _v_grafik.SQL.Text:= insert into vpp (Nomer_reisa, Vremya, Vremya_vzleta, Nomer_VPP) values (raquo;+#39+DBEdit5.Text+#39+laquo;,raquo;+#39+Edit2.Text+#39laquo;,raquo;+#39+Edit3.Text+#39+laquo;,raquo;+#39+Edit1.Text+#39+laquo;)raquo;;_v_grafik.ExecSQL;_vremya.Close;_vremya.SQL.Text:=laquo;update reis set Nomer_VPP= + # 39 + Edit1.Text + # 39 + , Data_vileta= + # 39 + Edit2.Text + # 39 + , Vremya_vzleta= + # 39 + Edit3.Text + # 39 + where Nomer_reisa=raquo;+#39+DBEdit9.Text+#39+laquo;raquo;;_vremya.ExecSQL;.DataSource.DataSet.Active:=false;.DataSource.DataSet.Active:=true;.DataSource.DataSet.Active:=false;.DataSource.DataSet.Active:=true;.DBGridEh1.DataSource.DataSet.Active:=false;.DBGridEh2.DataSource.DataSet.Active:=false;.DBGridEh1.DataSource.DataSet.Active:=true;.DBGridEh2.DataSource.DataSet.Active:=true;:=MessageDLG(laquo;Рейс вдало внесений в графік злетів. , mtInformation, [mbOk], 0) ;. Show; .Close ;;
end;.
