Bytes auftrag aufteilen

[Flocke]

Ich setz' noch einen drauf!
Hier eine gleichmäßige Verteilung mit Bresenham-Algorithmus:

Delphi-Quellcode:

Accu := 0;
for i := 0 to Count - 1 do
begin
  inc(Accu, GesamtMenge);
  Anteil[i] := Accu div Count;
  Accu := Accu mod Count;
end;