Delphi-Quellcode:
var i: integer;
vokabel: string;
begin
i:=random(2);
case i of
1: vokabel:='Vokabel1';
2: vokabel:='Vokabel2';
// usw
end;
end;
Hier ist aber keine Übersetzung vom Wort mit dabei...
müsste über 2. Case anwendung gemacht werden...
logischerweise dann über den selben random da sonst deine eingabe mit einer falschen übersetzung verglichen wird...
mal zu meinen fehlern:
es heißt nicht : b := 'edit2.Text';
sondern : b := edit2.Text;
es heißt nicht: x := random (1) +1;
sondern: x := random (5) +1;