Vokabeltrainer

[Xander91]

Also erstmal ich kann mit random und If umgehen =)

Ich hab das so gelernt :

Delphi-Quellcode:

randomize ;
zahl11 := random ( 5 ) 

Ich dachte ich kann das ungefähr so machen : procedure TForm1.Button1Click(Sender: TObject);
begin
   randomize;
Zahl1 := random ( 4 ) ;
IF Zahl1 = 1 THEN Label1.Caption := 'caedere';
IF Zahl1 = 2 THEN Label1.Caption := 'cadere';
IF Zahl1 = 3 THEN Label1.Caption := 'capere';

If Zahl1 = 1 AND Edit1.Text = faellen THEN Label1.Caption := 'richtig';
end;

[edit=SirThornberry]Delphi-Tags gesetzt. Nächstes mal bitte selbst machen. Mfg, SirThornberry[/edit]