Разработка программы по выбору оптимальной схемы закрепления заготовки в станочном приспособлении и расчету сил закрепления, страница 2

После вывода формы на экран программа переходит в режим ожидания. И в соответствии с действиями пользователя осуществляется запуск необходимых процедур, описание и принцип действия которых приведены ниже.

1.1.2.1 Процедура "FormCreate"

Управление этой процедуре передается при запуске программы перед созданием формы. Она предназначена для проверки целостности программы, инициализации данных и подготовки к работе.

Порядок действий осуществляемых при запуске процедуры "FormCreate":

1) Определяется полный путь к каталогу (с описанием логического устройства и каталогов) из которого был произведен запуск программы. Это необходимо для обнаружения и использования файлов содержащих вспомогательную информацию (рисунки схем закрепления, их описание, рисунки формул).

2) Проверяется наличие необходимых файлов без которых программа не сможет работать (Shema\none.bmp; Formuls\none.bmp; Texts\none.rtf). При отсутствии хотя бы одного из них на экран выводится сообщение об ошибке, и программа  завершает работу.

3) Инициализируются переменные.

4) Из базы данных производится чтение перечня схем закрепления.

1.1.2.2 Процедура "FormActivate"

Процедура "FormActivate" срабатывает при активации формы. Если модуль был активирован в первый раз (это возможно только при запуске программы), то управление передается модулю “Zastav.pas”, который выводит начальную заставку на экран и подгружает остальные модули.

1.1.2.3 Процедура "TabSheet1Show"

При нажатии на закладку "Выбор схемы закрепления" программа переходит в режим выбора схемы закрепления. При этом происходят действия:

1) Вызывается процедура "MyProc1".

2) На экран выводится список схем закрепления взятых из базы данных.

2) Выводится первая подсказка: "С помощью мыши или клавиш курсора выберите схему закрепления".

1.1.2.4 Процедура "MyProc1"

Процедура "MyProc1" вызывается в случае, когда пользователь прекращает работу с формулой. Она обнуляет переменные, связанные с расчетом формулы, делает невидимыми все компоненты высвечиваемые при нажатии на закладку расчета силы закрепления (кнопки, составляющие формулы и их численные значения).

1.1.2.5 Процедура "TreeVChange"

Вызов процедуры "TreeVChange" осуществляется при перемещении указателя по перечню схем закрепления. При этом происходят следующие действия:

1) Если на экране выведена первая подсказка, то выводится вторая: "После выбора схемы нажмите на закладку ’Расчет силы закрепления’".

2) Из базы данных по указанной схеме закрепления производится чтение информации о нахождении файлов содержащих рисунок схемы закрепления, ее описание и формулу.

3) На экран выводится содержимое вышеуказанных файлов. Если какой либо файл отсутствует, то на экран в соответствующее окно выводится: "Информация отсутствует".

1.1.2.6 Процедура "TabSheet2Show"

После просмотра схем закрепления и выбора одной из них пользователь нажимает на закладку "Расчет силы закрепления". При этом происходят следующие действия:

1) В окно подсказок выводится строка: "Введите все необходимые данные для расчета".

2) Из базы данных выбирается название файла содержащего строковое описание формулы.

3) В строковом описании формулы производится распознавание составляющих формулы и вывод их на экран. Принцип распознавания составляющих основан на том, что операнды отделяются между собой операторами или скобками (процедура "Pr01").

4) Если в формуле встречается коэффициент k, то на экран напротив коэффициента выводится кнопка выбора коэффициента k.

5) Для выбранной схемы относящейся к токарной обработке осуществляется поиск составляющих: "Pz","Px","Py". В случае удачного поиска на экран напротив каждой составляющей выводится кнопка с надписью "Выбрать…" для вызова модуля расчета сил резания.

6) Если схема закрепления относится к сверлильной операции, то программа осуществляет поиск составляющих "Мкр" и "Р0". После чего напротив первой составляющей выводится кнопка "Выбрать…"

7) Для фрезерной операции поиск осуществляется составляющей "Pz".

8) На экран выводится кнопка "Печать".

9) Выводится компонент "UpDown" (стрелки с цифрой) для выбора номера расчетной формулы.

1.1.2.7 Процедура "Button1Click"

При нажатии на кнопку выбора коэффициента k происходит запуск модуля "Unit2.pas" (приложение Б).

1.1.2.8 Процедура "RemoveK"

Эта процедура вызывается из модуля "Unit2.pas" перед его завершением и предназначена для передачи рассчитанного численного значения коэффициента запаса k.

1.1.2.9 Процедура "Button2Click"

При нажатии на кнопку "Печать" происходят следующие действия:

1) Определяется, к какой операции относится схема закрепления.

2) На форму печати выводится наименование операции и схемы, рисунок схемы и формулы, номер формулы, по которой производился расчет и составляющие формулы со своими численными значениями.

3) Форма печати выводится на принтер.

1.1.2.10 Процедура "Button1Click"

При нажатии на кнопку расчета сил резания для токарной операции запускается модуль "SilRez.pas" (приложение В). Затем запускается процедура "Rasch".

1.1.2.11 Процедура "Button4Click"

При нажатии на кнопку расчета сил резания на сверлильную операцию запускается модуль "RezSv.pas". Затем управление передается процедуре "Rasch".