Coder Forum

C Quellcode

TForm1 *Form1;
int Nr;     // "ja" und "yes" brauchen wir nicht.
const int Max = 1;
String Vocabeln;   // In Vocabeln soll ein string rein.
String Vocabeln1[Max];
 
//---------------------------------------------------------------------------
 __fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
 
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 // Vocabeln = StrToInt (Edit1->Text); // Damit speicherst du den Zahlenwert des Strings in "Vocabeln", 
                                      //wir brauchen aber den String:
 Vocabeln = Edit1->Text;
 // if (Vocabeln == ja) // damit vergleichst du den Inhalt der Variablen "Vocabeln" mit dem Inhalt der 
                        //Variable "ja". Du willst aber den Inhalt von "Vocabeln" mit dem Wort "ja" vergleichen:
if(Vocabeln == "ja")
Button1->Caption = "richtig";
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
 randomize ();
 Vocabeln1[0] = "Yes";
 Nr = random (Max);  
 Label1->Caption = Vocabeln1[Nr]; 
}
//---------------------------------------------------------------------------

C Quellcode

TForm1 *Form1;
int Nr; 
const int Max = 2;
String Eingabe, Vocabeln[Max][2];
 
//---------------------------------------------------------------------------
 __fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
 
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 Eingabe = Edit1->Text;
  if(Eingabe == Vocabeln[Nr][1])
    Button1->Caption = "richtig";
  else
    Button1->Caption = "falsch";
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
 randomize ();
 Vocabeln[0][0] = "Yes"; 
 Vocabeln[0][1] = "Ja";
 Vocabeln[1][0] = "No";
 Vocabeln[1][1] = "Nein";
 Nr = random (Max); 
 Label1->Caption = Vocabeln[Nr][0];  // Das englische Wort
}
//---------------------------------------------------------------------------