utton1Click (Sender: TObject) ;. Navigate (PathToMyDir + html main.html );
sLabel1.Caption:= Головна raquo ;;;
Процедура виведення на екран сторінки з інформацією про компанії ТОО Мілкомом raquo ;. [25]
TForm1.sButton2Click (Sender: TObject) ;. Navigate (PathToMyDir + html nas.html ) ;. Caption:= Про нас raquo ;;;
Процедура виведення інформації про кисломолочної продукції компанії із зображенням.
procedure TForm1.sButton3Click (Sender: TObject);.Navigate(PathToMyDir+laquo;htmlmol.htmlraquo;);.Caption:=laquo;Кисломолочная продукція raquo ;;;
Процедура виведення інформації про сирної продукції компанії із зображенням. [7]
TForm1.sButton4Click (Sender: TObject) ;. Navigate (PathToMyDir + html sir.html ) ;. Caption:= Сирна продукція raquo ;;;
Процедура виведення інформації про реквізити та контактні телефони компанії ТОО Мілкомом .
procedure TForm1.sButton5Click (Sender: TObject) ;. Navigate (PathToMyDir + html kon.html );
sLabel1.Caption:= Контакти raquo ;;;
Процедура виходу з програми. [25]
TForm1.sButton10Click (Sender: TObject);
begin;
Процедура, що дозволяє виводити на екран довідкову інформацію про компанію. [26]
TForm1.sButton6Click (Sender: TObject) ;. Navigate (PathToMyDir + html info.html );
sLabel1.Caption:= Довідкова інформація raquo ;;;
Процедура виклику програми прийому молочної продукції. [27]
TForm1.sButton7Click (Sender: TObject);
begin.showmodal;
Процедура авторизації, служить для перевірки введених користувачем логіна і пароля. [19]
TForm1.FormActivate (Sender: TObject);(form6.sEdit1.Textlt;gt;laquo;adminraquo;)and(form6.sMaskEdit1.Textlt;gt;laquo;passraquo;) then ( Логін або пароль не вірні raquo ;, mtError, [mbOk], 0) ;; end; .TzDbf1.DbfFileName:=PathToMyDir + data main.dbf raquo ;;. TzDbf1.Active:=true ;;
Процедура виклику програми виведення запасів компанії в повному обсязі. [8]
TForm1.sButton8Click (Sender: TObject) ;. showmodal;
Процедура обробки діючих констант. [28]
Run (App: string) ;: string ;: TStartupInfo ;: TProcessInformation; (nil,App [1], nil, nil, False, NORMAL_PRIORITY_CLASS, nil, nil, PMSI, PMPI); := Fault run process: + App + raquo ;;. MessageBox (ErrStr [1], Failure process raquo ;, MB_OK + MB_ICONERROR);
end; end;
Процедура запуску аналітичної частини програмного комплексу з розрахунку оптимального запасу підприємства. [21]
TForm1.sButton9Click (Sender: TObject); ( c: prog ); (Handle, nil, c: prog milh milh.exe raquo ;, nil, nil, SW_SHOW);
end;
Процедура, що запускається при відкритті вікна. [30]
TForm1.FormShow (Sender: TObject);
begin.showmodal;
. 3 Технологічна схема прийому молока
На малюнку 3.8, коротко, роз'яснена технологічна схема приймання молока. Обов'язковим компонентом виробництва кисломолочної і сирної продукції є молоко. Фірма, закуповуючи молоко у роздрібних виробників (селянські господарства і т.д.), приймає його, обробляє, пастеризує і сепарує. Під час цього процесу відбувається дозрівання вершків і сметани, легко виробляє сир. При цьому сир і вершки використовуються для виробництва сиру, дріжджів і закваски. При заквашування, сквашивании і необхідному охолодженні отримуємо Катик, ряжанку і кефір. Додаткові формули по розрахунку кількості готової продукції та її собівартості були надані товариством з обмеженою відповідальністю Мілкомом raquo ;. Програма відмінно синхронізує знову внесення дані у всіх доступних осередках, при цьому ці зміни не впливають на зміст бази даних, так як дані вносяться туди тільки при ретельній їх підготовки користувачем і тільки при натисненні на кнопку Прийняти raquo ;. У теоретичному матеріалі описується метод дослідження оптимального запасу. У даній програмі він використаний для підрахунку запасу проміжної продукції та її використанні при виробленні готової продукції. Адже у випадку добре розрахованого процесу, кількість втрат скорочується на вагомі цифри. Ось припустимо при обробці молока дозрівають вершки і сметана, звичайно, сметана вже готовий продукт, а от в...
