Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Spiel-Automat

    Delphi
    by Wuaegner, 16. Jan 2005
  @malo,
  Er kannte die case-Anwendung nicht drum hab ich eine Beispielanwendung geschrieben. Dass man begins und ends bei einzelnen Anweisungen weglassen kann aber nicht muss interessiert hier doch niemanden.
  Wie du schon gesagt hast kommen da bei ihm sowieso noch andere Anweisungen rein, also braucht er sie.
  Bei "zwischen 0..5" hast du allerdings recht.
• Forum: Object-Pascal / Delphi-Language

  Re: Spiel-Automat

    Delphi
    by Wuaegner, 16. Jan 2005
  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;
• Forum: Object-Pascal / Delphi-Language

  Re: Spiel-Automat

    Delphi
    by Wuaegner, 16. Jan 2005
  Hi,
  mit randomize; dann mit random(Obergrenze der Zahl) eine Zufallszahl bilden und dann z.B eine case - Abfrage:case zahl of
  '1': begin
  Mache BIld so und so da und da hin oder auch nicht ^^
  end;
  '2': begin
  usw.
  
  end;