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]