[Informatik] Delphi 5

**Kenjia** · 25.04.2006, 16:22

So ich habe ein Delphi-Problem und hoffe ihr könnt mir helfen.

Ich soll eine art Spiel programmieren, in dem man die Buttons, die mit verschienden Zufallszahlen beschrieben sind in der richtigen Reihenfolge anklickt.

Also ich habe 7 Button
1 zum schließen (ist klar)
1 zum zufallszahlen auswählen, denn durch diesen Button soll die caption der anderen 5 button mit einer Zufallszahl versehen werden.
und eben die anderen 5 Button
wie ich das mit dem zufall da mache hab ich schon gecheckt, aber ich soll daraus eine art spiel machen, mit dem man die verschiedenen Buttons miteinander vergleicht.
Angenommen caption von Button1 ist 4 und die von Button2 ist 1, dann muss ich die in der richtigen Reihenfolge drücken. Hier also erst Button2 und dann Button1. das ganze allerdings mit 5 Button.
naja, da bin ich jedenfalls so weit gekommen, dass ich eine variable einführe(var1). Diese soll am anfang den Wert 0 haben und später, sobald ich einen Button drücke den wert wechseln (Bsp. ich drücke button1(caption=5) dann bekommt var1 den wert von 5). Allerdings hab ich jetzt das Problem, dass ich nicht weiß wo ich das hinschreibe. da ich ja nicht unter Form schreiben kann, var1=0 (vereinfacht). Denn dann würde doch die ganze zeit es heißen und für jeden button es gelten, dass var1= o ist, oder??

Bin ich jetzt irgendwie voll auf dem falschen Dampfer oder habt ihr irgendwelche Vorschläge, wie ich dieses Problem lösen kann??

Vielen dank im Vorraus, die sich mit diesem Thema beschäftigen und mit vielleicht weiterhelfen können.

Kenjia

PS.
ich weiß, diese erklärung ist nicht die tollste, bei fragen versuche ich es nochmal klarer zu erklären. sorry!!

**EvoGT** · 25.04.2006, 20:32

sind die zufallszahlen alle mit unterschiedlichem abstand?

naja ich würds so machen:
alle buttons bis auf den ersten deaktivieren.
auf dem ersten button werden die zufallszahlen generiert und
die jeweiligen werte in die captions der anderen buttons übernommen.
es wird eine neue variable mit dem wert 0 angelegt ("vergleichswert")
die buttons werden alle aktiviert (enabled)
das dürfte ja soweit kein problem für dich sein.

so und in die anderen aktionen der buttons wird immer das
selbe eingeschrieben:
- vergleiche den wert der caption mit der variable vergleichswert.
- wenn die caption einen höheren wert hat, setze den vergleichswert auf den wert der caption
und deaktiviere den button.
- wenn der wert kleiner ist als der vergleichswert, deaktiviere alle buttons bis auf
den ersten.
gib eine fehlermeldung an den spieler aus, dass die reihenfolge falsch ist.

einen kleinen haken hat die sache aber:
man kann so lange spielen bis zum ende durch zufall eine zahl übrig ist,
die kleiner ist als die vorhergehende ohne einen fehler bis dahin zu bekommen.
verhindern lässt sich das mit einem sortierten feld und einer laufvariable.
ist aber denk ich für den anfang nicht nötig.

**Kenjia** · 26.04.2006, 15:32

Also:
Naja, sind Zufallszahlen zwischen 1 und 100, warscheinlich das der Abstand unterschiedlich ist, oder??

ja, mein Problem ist erstens:
normalerweise schreibe ich die varieablen ja unter dieses

var
Form1: TForm1;
var

aber wenn ich sage, dass die Null sein soll, dann gilt das doch für alle Buttons, dass des null ist und kann ich das dann traotzdem noch überschreiben??

mit deaktivieren meintest du doch sowas wie disabled(enabled hast du vorgegeben-> gegenteil= disabled(oder, habs mir irgendwie hergeleitet)
naja, hatts noch nciht. Mal schauen, muss mal ausprobieren.

aber danke...

Edit: hat sich gelöst... vielen dank*verbeug*