Rechtecke auf TCanvas "verteilen"

[Thorben_Ko]

Hallo,

ich habe ein mehrer Objekte geschrieben die einfac hgesagt folgendes machen:

TField zeichnet einfach ein Rechteck auf ein TCanvas

TFarbFeld wurde von PaintBox vererbt und auf dem Canvas werden die Rechtecke gezeichnet.

Die grösse der einzelnen Rechtecke ist abhängig von der grösse der Painbox.

Die Höhe und die Breite die jedes einzelene Field haben muss rechne ich mit
hohe := Self.Height div fRowCount; aus.

DAs probleme ist nun das er logischer weise (manchmal) einen rest bekommt. Dieser Rest wird micht befüllt. Ich möchste diesen Rest halbwegs gleichzeitig auf die Felder verteilen, um nicht am ende einen Bereich ganz "leer" zu lassen.Ich hab aber keine Idee wie ich das machen soll.

Hoffe jemand hat diesen Text verstanden und kann mir helfen

Thorben