Реферат Програмна реалізація кур'єрського замовлення

ign="justify"> äëÿ êîíöà âðåìåíè ðàáîòû ', Left + Width div 2-50, top + Height div 2-50);;;: = StrToInt (EditDoMinCourEdit.Text ); (DoMinute <0) or (DoMinute> 59) thenException.Create ('error with minute');; (' Îøèáêà â ïîëå Ìèíóòû äëÿ íà ÷ àëà âðåìåíè ðàáîòû ', Left + Width div 2-50, top + Height div 2-50);;; OtHour> DoHour thenException.Create ('error with time');; (' Îøèáêà ðàçíèöû âðåìåíè ', Left + Width div 2 - 50, top + Height div 2-50);;; (OtHour = DoHour) and (OtMinute> DoMinute) thenException.Create ('error with time');; (' Îøèáêà ðàçíèöû âðåìåíè ', Left + Width div 2-50, top + Height div 2-50);;; EditVolCourEdit.Text ='' thenException.Create (' error with volum ') ;; (' Îøèáêà â ïîëå Îáúåì ', Left + Width div 2-50, top + Height div 2-50);;;: = StrToInt (EditVolCourEdit.Text); Volume <= 0 then (' Wrong volume ', Left + Width div 2 -50, top + Height div 2-50);;; EditWeightCourEdit.Text ='' thenException.Create ('error with weight');; (' Îøèáêà â ïîëå Âåñ ', Left + Width div 2-50, top + Height div 2 - 50);

exit;;

Weight: = StrToInt (EditWeig...