Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Лекция №33.doc
Скачиваний:
0
Добавлен:
01.05.2025
Размер:
1.54 Mб
Скачать

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

Основным управляющим модулем является модуль TexPro.pas. Модуль techkart.pas отвечает за вывод формы для ввода и выбора необходимых данных для заполнения технологической карты. Модуль steel.pas отвечает за хранение и отображение данных о стали. Модуль avtor.pas отвечает за вывод справочной информации об авторе.

При загрузке ПМК происходит запрос авторизации пользователя, если авторизация прошла успешно – вход в программу, иначе – выдача сообщения об ошибке или выход из ПМК. При запуске приложения программа автоматически проверяет наличие баз данных и правильность пути к ним. Если базы данных не обнаружены, то выводиться сообщение об отсутствии баз данных и программа не загружается.

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

Покажем с помощью блок-схем и программного кода реализацию модулей ПМК расчета автоматизации проектирования технологического процесса термообработки заготовок.

На рисунке 2.3 приведена блок-схема работы аутентификации пользователя.

Рисунок 2.3 – Блок-схема аутентификации пользователя

Реализация аутентификации пользователя представлена на рисунке 2.4

if login.Text='' then ShowMessage('Введите логин');

if pass.Text='' then ShowMessage('Введите пароль');

if (login.Text<>'') and (pass.Text<>'') then begin

Try

ADOQuery1.SQL.Clear;

ADOQuery1.SQL.Add('select count(surname) as count');

ADOQuery1.SQL.Add('from workers');

ADOQuery1.SQL.Add('where login='+QuotedStr(login.Text));

ADOQuery1.SQL.Add('and password='+Quotedstr(pass.text));

ADOQuery1.ExecSQL;

DataSource1.DataSet:=ADOQuery1;

result:=DataSource1.DataSet.FieldList.Fields[0].Value;

if result=0 then

showmessage('неверный логин/пароль')

else frm_main.Show;

except

ShowMessage('error');

end;

Рисунок 2.4 – Аутентификация пользователя

Алгоритм расчета данных для графика представлен на рисунке 2.5.

Рисунок 2.5 – Алгоритм расчета данных для графика

Запрос для извлечения данных из БД, в зависимости от выбранного режима термообработки представлен на рисунке 2.6.

select a.temp_nach, a.temp_kon from norm_time a

where a.type_to= QuotedStr(CB_to);

Рисунок 2.6 – Пример запроса данных из БД

2.3 Элементы интерфейса пмк для автоматизации проектирования технологического процесса термообработки заготовок

На рисунке 2.7 представлен интерфейс системы для автоматизации проектирования технологического процесса термообработки заготовок. На главной форме пользователю предоставляется выбор операции для автоматизации разработки технологического процесса.

Рисунок 2.7 – Элементы интерфейса главной страницы ПМК для автоматизации проектирования технологического процесса термообработки заготовок

На рисунке 2.8 показана форма авторизации в ПМК для автоматизации проектирования технологического процесса термообработки заготовок

Рисунок 2.8 – Форма авторизации в ПМК для автоматизации проектирования технологического процесса термообработки заготовок

Форма выбора справочников представлен на рисунке 2.9.

Рисунок 2.9 – Наименование справочников ПМК для автоматизации проектирования технологического процесса термообработки заготовок

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]