Spiel-Automat

[Wuaegner]

Code:

var zahl: integer;
begin
 randomize;
  zahl:= random(5); // Zahl zwischen -1 und 5 wird erzeugt, also 0,1,2,3 oder 4
  case zahl of
               '0': begin
                    ImageZahl1.visible:= true;
                    end;
               '1': begin
                    ImageZahl2.visible:= true;
                .
                .
                .
               
               '4': begin
                    ImageZahl5.visible:= true;
                    end;   
  end;
end;

[edit] Kommentar korrigiert [/edit]