color := random(color);

Hi..
ich bin gerade dabei mir sone Art Bildschirmschoner zu machen, jedoch nicht mit einer Form1 sondern in der Konsole-Form von Delphi..

naja meine Frage:
Wie kann ich wenn ich eine Farbe brauche eine Zufallsfarbe benutzen?

markieren

Delphi-Quellcode:

			     Parent := self;

     top := 250;

     left := 0;

     font.Height :=50 ;

     font.Style := [fsbold];

     font.color := clwhite;

     font.Name := 'Comic Sans MS';

     color := [color=#ff0000]random(color)[/color];

Ich habe es mit einer neuen Prozedur ausprobiert die mir eine Farbe ermischt:

markieren

Delphi-Quellcode:

			procedure mycolor;

begin

 cRed:=Random(256);

 cGreen:=Random(256);

 cBlue:=Random(256);

 CC:=RGB(cRed, cGreen, cBlue);

end;

Jedoch auch wenn ich die variable CC bei Color einbinde habe ich immer schwarz als Farbe

Also was tun??

mfg Sven

color := random(color);

color := random(color);

Forumregeln