markus test das mal (ist nur ne art wie dus machen könntest) nimm mal testweise ein sahpe her und rechts nen button
Delphi-Quellcode:
var i : Integer;
begin
i := Shape1.Brush.Color;
inc(i,10);
Shape1.Brush.Color := i;
gib dem shape.brush.color(im objektinspektor) vor dem ausfürhen zum beispiel die farbe blau
dann klick ein paar mal
so kannst du das per canvas.Pixels[x,y] auch leicht machen und dann hast es schon
(rest ist schleifen-sache und probiersache)