code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
| char Kleuren[][10]={"clRed","clYellow","clGreen","clBlack"};
int i;
int x;
randomize();
//rondje1
i=random(3);
Object1->Brush->Color=(TColor)Kleuren[i];
Buffer1->Caption=Kleuren[i];
//rondje2
i=random(3);
Object2->Brush->Color=(TColor)Kleuren[i];
Buffer2->Caption=Kleuren[i];
//rondje3
i=random(3);
Object3->Brush->Color=(TColor)Kleuren[i]; |
De objecten zijn Tshapes (rondjes) en de buffers zijn labels. Nu zou je denken dat rondje 1 de kleur krijgt die in buffer 1 staat en voor rondje 2 hetzelfde, maar dit is niet het geval, ook hebben de rondjes altijd dezelfde kleur en staan er vaak hele andere kleuren in de buffer, wat doe ik verkeerd?