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

an align="justify">:' + IntToStr (curZak.zak.dohour.hour ) + '.' + IntToStr (curZak.zak.dohour.min) + ' âåñ :' + IntToStr (curZak. zak.ves) + ' îáúåì :' + IntToStr (curZak.zak.v olume));: = curZak.next;;;; TMainWind.WeightCourListBoxClick (Sender: TObject);: TCurZakaz;: Tcourier; WeightCourListBox.ItemIndex> = 0 '+ CurZak.zak.adress +' ñ : '+ IntToStr (curZak.zak.othour.hour) +'. ' + IntToStr (curZak.zak.othour.min) + ' äî :' + IntToStr (curZak.zak.dohour.hour ) + '.' + IntToStr (curZak.zak.dohour.min) + ' âåñ :' + IntToStr (curZak. zak.ves) + ' îáúåì :' + IntToStr (curZak.zak.volume));: = curZak.next; ;;;

{Додавання замовлень = Nil) then exit;: = listCour; (curCur <> nil) do (zak.addToCour) then break; (curCur.Volume-curCur.NowVolume> = zak.volume) then (curCur.weight-curCur.NowWeight> = zak.ves) then (((curCur.ottime.hour

((curCur.dotime.hour> zak.othour.hour) or ((curCur.dotime.hour = zak.othour.hour) and (curCur.dotime.min> = zak.othour. min)))) or

(((curCur.ottime.hour

((curCur.dotime.hour> zak.dohour.hour) or ((curCur.dotime.hour = zak.dohour.hour) and (curCur.dotime.min> = zak.dohour. min)))) or

(((curCur.ottime.hour> zak.othour.hour) or ((curCur.ottime.hour = zak.othour.hour) and (curCur.ottime.min> = zak.othour . min))) and

((curCur.dotime.hour {Редагування кур'єрів} TMainWind.ChangeCourButtonClick (Sender: then: = tempBuffer.PointZak;. PointZak: = nil; CurrListZak <> nil do.zak.addToCour: = false;: = CurrListZak.next;;: = ListZak; currZak <> nil do (currZak);: = currZak.next;;;;;

{Видалення кур'єрів} TMainWind.DeleteCourButtonClick (Sender: do.zak.addToCour: = false; (CourZakBuff.zak);: = CourZakBuff.next;;;;;

{Редагування замовлень} TMainWind.ChangeZakButtonClick (Sender: TObject);, temp: Tzakaz; ListZakStringGrid.Row> = 0 then: = listZak; currZak.number <> ListZakStringGrid.Row do: = currZak . next;: = currZak;. ShowModal;;; (tempBufZak);;

{Видалення замовлень} TMainWind.DeleteZakButtonClick (Sender: do: = delZak;: = DelZak.nex...