Erstes Delphi Programm =)

[DeddyH]

Das sieht OK aus, aber im vorherigen Code fällt mir auf, dass da wohl begin und end fehlen.

Delphi-Quellcode:

if x = 1 then
begin //das fehlte
  BitBtn6.Visible := true;
  BitBtn7.Visible := true;
  BitBtn8.Visible := true;
  BitBtn9.Visible := true;
  BitBtn10.Visible := true;
  x := random(4)+1;
end //das auch
else
  windows.beep(200,400);
end;

[Super_Chemiker]

ok
probiers mal ein paar mal, vielleicht nimmt er ja nicht immer den ersten...

[Super_Chemiker]

bzw. nicht immer den 3.

[4nG3L]

also ich hab das jetzt bei den erseten 5 buttons gemacht und wenn ich das überall gleich habe dann ist keiner mehr richtig...

[Super_Chemiker]

du musst auch schauen, dass bei den buttons immer die zahl stimmt

Delphi-Quellcode:

if x = 1 then// hier der einser muss verschieden sein
...

[mkinzler]

Warum wurde hier eigentlich Case durch If ersetzt?

[4nG3L]

ach lol das wars^^ danke jetzt klappts....in der ersten reihe =)

[Super_Chemiker]

keine ahnung?!
aber wenn ich nur wissen will, ob eine zahl gleich einer anderen ist, muss ich ja nicht gleich case verwenden oder

[4nG3L]

wie mache ich es jetzt das es für die 2. reihe auch random ist?

[Super_Chemiker]

dafür musst du da, wo er die zweite zeile sichtbar macht(also wenn er den richtigen button drückt) wieder

Delphi-Quellcode:

x := random(4)+1;

machen.