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

aus den drei Zeilen Quellcode lässt sich der Fehler kaum nachvollziehen. Aber du hast doch schon ermittelt, welches Auto gewonnen hat, das musst du doch nur noch mit dem Tipp des Spielers verknüpfen. Zeig doch mal den Code, wo du den Gewinner ermittelst.

Hi

Ein String in Delphi wird mit zwei Anführungszeichen gekennzeichnet, nicht mit Str()

Jaden Yuki hat folgendes geschrieben :

markieren 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,