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

Эти процедуры предназначены соответственно для расчета и вывода на экран коэффициента kм и осевой силы с крутящим моментом. Если расчитанные значения превышают число 999999, то на экране появляется сообщение: "Внимание!!! Ошибка! Значение превышает заданный диапазон".

1.1.5.5 Процедура "Edit1KeyPress"

После ввода числа в компонент типа "Edit" при нажатии на кнопку "Enter" эта процедура осуществляется передачу фокуса следующему по списку компоненту.

1.1.5.6 Процедуры "Edit1Exit", "Edit2Exit", "Edit3Exit", "Edit4Exit", "Edit5Exit", "Edit6Exit", "Edit7Exit", "Edit8Exit", "Edit9Exit", "Edit10Exit", "Edit11Exit", "Edit12Exit", "Edit13Exit"

Эти процедуры вызываются при передаче фокуса от компонента типа "Edit" любому другому. При этом происходит запись введенное число и производится расчет силы резания путем запуска процедуры "Rasch3".

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

При нажатии на кнопку "ОК" происходит передача расчитанных результатов в основной модуль. Работа модуля "SilRezSv.pas" завершается.

1.1.6 Описание модуля "SilRezFr.pas"

Этот модуль предназначен для расчета окружной силы фрезерования. Запускается модуль "SilRezFr.pas" при нажатии на кнопку "Выбрать…" расположенной напротив силы Pz в окне расчета силы закрепления при фрезеровании закрепляемой заготовки. При запуске на экран выводится форма изображенная на рисунке 6.1, состоящая из 4-х окон.

1) Окно выбора обрабатываемого материала.

2) Окно выбора типа фрезы.

3) Окно выбора материала рабочей части резца.

4) Окно ввода дополнительной информации и вывода полученного результата.

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

Процедура "FormCreate" проводит подготовку необходимых данных модуля и формы перед началом работы модуля.

1.1.6.2 Процедуры "RadioGroup1Click", "RadioGroup2Click", "RadioGroup3Click"

Эти процедуры выполняются при выборе пользователем строки в соответствующих группах выбора: обрабатываемый материал, тип фрезы, материал рабочей части фрезы. При этом происходят соответствующие изменения на форме и запускается процедура "Rasch2".

1.1.6.3 Процедура "Rasch2"

Процедура "Rasch2" осуществляет расчет и вывод коэффициентов Ср, x, y, u, q, w для осевой силы и крутящего момента. Затем запускаются процедуры "FindKm", "Rasch3".

1.1.6.4 Процедуры "FindKm", "Rasch3"

Эти процедуры предназначены соответственно для расчета и вывода на экран коэффициента kм и окружной силы Pz. Если расчитанные значения превышают число 999999, то на экране появляется сообщение: "Внимание!!! Ошибка! Значение превышает заданный диапазон".

1.1.6.5 Процедура "Edit1KeyPress"

После ввода числа в компонент типа "Edit" при нажатии на кнопку "Enter" эта процедура осуществляется передачу фокуса следующему по списку компоненту.

1.1.6.6 Процедуры "Edit1Exit", "Edit2Exit", "Edit3Exit", "Edit4Exit", "Edit5Exit", "Edit6Exit", "Edit7Exit", "Edit8Exit", "Edit9Exit", "Edit10Exit", "Edit11Exit", "Edit12Exit", "Edit13Exit"

Эти процедуры вызываются при передаче фокуса от компонента типа "Edit" любому другому. При этом происходит запись введенное число и производится расчет силы резания путем запуска процедуры "Rasch3".

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

При нажатии на кнопку "ОК" происходит передача полученного результата в основной модуль. Работа модуля "SilRezFr.pas" завершается.

1.1.7 Описание модуля "UFam.pas"

Модуль "UFam.pas" предназначен для ввода фамилии, инициалов студента и группы, и вывода их на печать.

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

Эта процедура запускается при выводе формы на экран. Она предназначена для передачи фокуса компоненту "Edit1".

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

При нажатии на кнопку "Далее…"  информация о студенте передается на форму печати и модуль "UFam.pas" завершает работу.

1.1.8 Описание модуля "Print.pas"

Модуль "Print.pas" осуществляет вывод необходимых данных на форму печати, а затем непосредственно на принтер. Этот модуль содержит единственную процедуру "FormCreate" которая проводит подготовку переменных модуля.

1.1.9 Описание модуля "About.pas"

При запуске этого модуля на экран выводится информация о разработчиках. При нажатии на кнопку "ОК" происходит выход.

1.1.10 Описание модуля "Zastav.pas"

Этот модуль предназначен для вывода заставки на экран. Заставка отображается до тех пор, пока происходит загрузка основных модулей.


Список литературы

1. Белоусов А. П. Проектирование станочных приспособлений. Изд. 2-е, перераб. и доп. – М.: Высш. школа, 1774. – 263 с.

2. Горошкин А. К. Приспособления для металлорежущих станков: Справочник. – 7-е изд., перераб. и доп. – М.: Машиностроение, 1979. – 303 с.

3. Справочник  технолога – машиностроителя: В 2 т. / Под ред. А.Г.Косиловой, Р.К.Мещерякова. – 4-е изд., перераб. и доп. – М.: Машиностроение, 1986.- Т.1.- 656 с.

4. Станочные приспособления: Справочник / Под ред. В. Н. Вардашкина, В. В. Данилевского. – М.: Машиностроение, 1984. – т. 2. – 656 с.