Jaden Yuki - So 27.09.09 16:02
Titel: Wie eine Wette realisieren?
Hallo,
bin sozusagen noch ein Delphi-Anfänger.
Habe mir ein kleines Autorennen gebastelt.Funktioniert tadellos.
Zwei Autos fahren bei Grün los.Wenn eins der Autos die Ziellinie überquert,erscheint ein Label,auf welchem steht:
"Auto 1 (bzw. Auto 2,je nach dem welches gewonnen hat) hat gewonnen!"
Die Geschwindigkeit wird per Random gesteuert.
Nun möchte ich eine Wettfunktion einbauen.
Vorher kann man wetten,welches Auto gewinnt.
Habe zwar paar Sachen ausprobiert,doch ich scheitere schon beim Quelltext.
Man kann in ein Editfeld eingeben,ob Auto 1 oder Auto 2 gewinnen wird.
Nun habe ich eine Variable "A" als String deklariert.
Den Inhalt des Textfeldes habe ich nun der Variable zugewiesen.
Wenn nun ein Auto gewinnt,soll ein Label erscheinen:Du hast deine Wette gewonnen. bzw. Du hast deine Wette verloren.
Jetzt kommt mein Problem:
| Zitat: |
If A=str(Auto 1) Then
lbWette1.visible:=true
Else lbWette2.visible:=true |
Hier erscheint immer der Fehler,dass der Begriff "Auto 1" nicht definiert wurde.
Wie löse ich dieses Problem?
Liebe Grüße,
Jaden Yuki
Hidden - So 27.09.09 17:15
Hi :)
Ein String in Delphi wird mit zwei Anführungszeichen gekennzeichnet, nicht mit Str() ;)
 Jaden Yuki hat folgendes geschrieben  : |
Delphi-Quelltext 1:
2:
3:
| if A = 'Auto 1' then
lbWette1.visible := true
else lbWette2.visible := true | |
Mit zwei Labels würde ich das auch nicht machen, sondern entsprechend
Label1.Caption := 'Auto n gewinnt das Rennen.';.
mfG,