achso, ich hab mir noch mal wort für wort alles durchgelesen, jetzt hab ichs verstanden...
also, ich würds so machen:
Delphi-Quellcode:
{also, ich gehe von dieser farbe aus 212,208,200,
und davon, das dass ein rgb, und kein grb ist, sonst muss man es halt umstellen...}
repeat
blau:=blau+1;
//symbolisch
until blau=rot;
repeat
gruen:=gruen+1;
until gruen=rot;
//bis hier wird sichergestellt, das es ein echtes grau ist, dann dies:
for rot:=rot
downto 0
do
begin
gruen:=rot;
blau:=rot;
sleep(100);
//oder halt mehr, oder weniger....
end;
//so, das wärs