Eine Farbe besteht aus rot,grün und blau. Wenn du nur Graustufen willst würde das so aussehen eine Zufallsfarbe zu erzeugen. Desweiteren sollte man Randomize nur ein einziges mal im Programm aufrufen.
Delphi-Quellcode:
var LFarbwert: Byte;
begin
Randomize;
[...]
LFarbwert := Random(256) - 1;
brush.color :=
RGB(LFarbwert, LFarbwert, LFarbwert);
Da das ganze mit den Dreiecken aber eine neue Frage ist und die ursprüngliche Frage beantwortet ist mach ich hier mal zu. Neue Frage -> Neuer Thread
*** LOCKED ***