changeset 690 | e9d35e319328 |
parent 652 | 4cca0c7de609 |
child 762 | 5ecf042f6113 |
689:f4ec46c48ed2 | 690:e9d35e319328 |
---|---|
921 |
921 |
922 t:= cScreenHeight - 4; |
922 t:= cScreenHeight - 4; |
923 for i:= 0 to Pred(TeamsCount) do |
923 for i:= 0 to Pred(TeamsCount) do |
924 with thexchar[i] do |
924 with thexchar[i] do |
925 begin |
925 begin |
926 dec(t, team^.HealthRect.h + 2); |
926 dec(t, team^.HealthSurf^.h + 2); |
927 ny:= t; |
927 ny:= t; |
928 dy:= dy - ny |
928 dy:= dy - ny |
929 end; |
929 end; |
930 |
930 |
931 Gear^.Timer:= cSorterWorkTime; |
931 Gear^.Timer:= cSorterWorkTime; |