Farbenanzahl

[bitsetter]

Darum wäre es wohl so besserColor:= RGB(Random(256), Random(256), Random(256)); Edit: Wenn du lieber helle Farben möchtest, kannst du es noch ein bisschen eingrenzen.

Delphi-Quellcode:

var
  r, g, b: Byte;
begin
  r:= Random(156)+ 100;
  g:= Random(156)+ 100;
  b:= Random(156)+ 100;
  Color:= RGB(r, g, b);