Після обчислень відбувається зчитування даних з Exel файлу і запис готових відповідей в програму.
Кнопка закриття програми.
Ap.DisplayAlerts: = False - скасування запиту про збереження Exel файлу
Ap.Workbooks.close - Закриття робочої книги
Ap.Application.Quit - Закриття Exel файла.Terminate - Закриття программиTForm1.FormClose (Sender: TObject; var Action: TCloseAction);
У цій процедурі при натисканні на хрестик відбувається закриття програми та Exel файлу.
Ap.DisplayAlerts: = False - скасування запиту про збереження Exel файлу
Ap.Workbooks.close - Закриття робочої книги
Ap.Application.Quit - Закриття Exel файла.Terminate - Закриття програми
Висновки
У курсовій роботі були проведені розрахунки різними способами вирішення транспортної задачі.
Була складена програма, яка розроблена в програмі Delphi.
У програмі зручний і зрозумілий інтерфейс. Для введення даних використовується клавіатура. Дані, виведені програмою, відповідають тим, що отримані при розрахунках вручну - методом найменшого елемента і методом потенціалів, відповідають рішенню в програмі TORA і в програмі. MicrosoftExcel 2007 реалізовану через В«Пошук рішенняВ»
Для всіх способів мінімальні грошові витрати рівні 3700000 Д.Є.
Таким чином, поставлене завдання було виконано.
Список використаної літератури
1. Данілін Г.А. Математичне програмування з EXCEL: Навчальний посібник для студентів усіх спеціальностей МГУЛ/Г.А. Данілін, В.М. Курзіна, П.А. Курзін та ін - М.: МГУЛ. 2005.
. Корняков В.М. Програмування документів і додатків MS Office в Delphi. - СПб.: БХВ-Петербург, 2005. - 496 с: іл.
. Таха, Х.А. Введення в дослідження операцій, 7-е видання.: Пер. з англ. - М.: Видавничий дім "Вільямові", 2005. - 912 с: ил.
