Nochwas ist mir grade aufgefallen:
Zitat von
lun87:
showmessage('Im folgenden hast du 5 Versuche die gesuchte Zahl zu finden. Sie liegt zwischen 1 und 20!');
zufallszahl := random(20);
Vorsicht!
random(20); erzeugt eine Zahl zwischen 0 und 19
Du musst also noch 1 dazu addieren:
zufallszahl := random(20) + 1;
Tipp:
Anstatt eingabeedt.text := ''; in FormCreate zu sezten kannst Du auch einfach im ObjektInspektor bei eingabeedit die Eingenschaft Text auf den gewünschten Wert setzen.