Es bringt hier nichts so viele lokle Variablen zu erstellen, weil sobald der Code von "RateButtonClick" fertig ist, sind die daten im Nirvana.
Also wir machen das so:
Wir haben 2 Buttons, ein Edit, ein Panel!
Die Buttons haben folgende Funktionen:
rb - RateButton - Überprüft, ob richtig geraten (Standardmäßig deaktiviert)
ngb - NewGameButton - Erstellt eine neue Zufallszahl
das Edit:
re - RateEdit - Darin wird die geratene Zahl eingegeben (Standardmäßig deaktiviert)
das panel:
ep - EreignisPanel - Darin wird das ergbnis ("Korrekt"/"Falsch") und die Bisher geratenen Zahlen ausgegeben!
Das zur
GUI.
Dann die Variablen:
Erstelle 2 globale Variablen:
grz - geratene Zahlen - Das ist ein array wo die geratenen Zahlen drinn stehen
vnr - Versuchnummer - Das ist eine Zahl, in der die akt. Chance gepsichert ist
zerz - Zuerratene Zahl - Darin speicherst du die Zuffalszahl
Dann mache folgendes:
Wenn die Form erstellt wird:
Führe "Randomize" aus.
Jetzt muss der Benutzer auf ngb klicken:
- Setze die Anzahl der bisherigen Versuche auf 0
- aktivier rb und re
- Leere das array und re
- erstelle eine Zahl zwischen X und Y und speichere sie in zerz
Und jetzt kann der Benutzer raten indem er sein ergebnis in re eingibt und auf rb klickt:
- Überprüfe ob die Zahl richtig ist
- füge in das array die Zahl aus re ein
- Leere re
- Schreibe in ep, ob das ergebnis richtig war, und was er schon geraten hatte
So... Ansich ist das eigentlich "Pseudocode", also nicht mehr sehr schwer... Und ich verstehe nicht, was du ständig mit "Application.New/Restart" willst. Du musst nichts neustarten... Du musst nur die Änderungen rückgänigmachen (also z.B. das Edit leeren...)
Und mit Leeren meine ich, den Inhalt leeren, und nicht die Komponente "wegschmeißen"! (z.B. re.text := '')
An sich dürften 2 forschleifen vorkommen... Und informiere dich vorher, wie for-schleifen funktionieren! (Hilfe z.B.)
PS: Dein Code ist ansich schon richtig, nur eben nicht komplett richtig umgesetzt.
PPS: Ich werde dir nicht sagen, wie man in einem Array etwas schreibst, weil es mindestens schoneinmal hier gesagt wurde!