problem mit visible

**Bx3**

hi,
also, ich will 2 würfel für ein spiel simulieren,
unzwar sind diese mit jeweils 6 images welche übereinander
liegen versehen (jedes für eine zahl halt).
jetze wollte ich die mit einem delay sozusagen blinken lassen
bzw abwechselnd erscheinen lassen, nur funzt das iwie nich

hier mal der quelltext

zusammenfalten · markieren

Delphi-Quellcode:

			 randomize;

 For i:=1 to 10 do

  begin

   x:=random(5)+43;

   y:=random(5)+49;

   (Findcomponent('Image'+intToStr(x))as TImage).visible:=true;

   (Findcomponent('Image'+intToStr(y))as TImage).visible:=true;

   sleep(100);

   If i<> 10 then

    begin

     (Findcomponent('Image'+intToStr(x))as TImage).visible:=false;

     (Findcomponent('Image'+intToStr(y))as TImage).visible:=false;

    end;

  end;

also es wird immer nur das letzte angezeigt
(auch wenn ich das delay extrem hochsetze passiert zb erst nach 10 was, aber
wieder halt nur das letzte)

hoffentlich war das jetze verständlich^^

schonma danke
Bx3

problem mit visible

problem mit visible

Forumregeln