wäre ne idee *Aaaargh*
vollgefressen kann man nicht denken
edit:
wieso geht das nicht richtig:
Delphi-Quellcode:
repeat
sleep(speed2);
label2.Font.Color := farbe[random2];
label2.Caption := name[random1];
label3.caption := inttostr(x) + '/20';
x := x + 1;
until x = 20;
showmessage('');
der wechselt nur einmal name mit bestimmter farbe und dann ist er schon bei 20 ... er soll eigentlich 20 mal wechseln und dann ne msg ausgeben ...