[Delphi] Konrolstruktur

html.de-Forum C/C++/C#, Java, Visual Basic
1

servus,

ich hab ein Problem mit einer Kontrolstruktur, und finde den fehler einfach nicht:lol:

hier ist der code:

[CODE] if edit1.text = englisch.Strings[NR] then

  showmessage('   richtig   ');
  randomize ;
  Nr := random(german.count);
  panel1.caption := german.Strings[NR]

  else
  showmessage('Flasch richtig wäre ' + richtig)
  end[/CODE]

es ist sicher irgend wo ein einfacher fehler aber solche finde ich einfach nicht:lol:

mfg krumme

2

du hast die begins und ends vergessen^^

  if edit1.text  = englisch.Strings[NR] then
      begin
      showmessage('   richtig   ');
      randomize ;
      Nr := random(german.count);
      panel1.caption := german.Strings[NR]
      end
      else
      begin
      showmessage('Flasch richtig wäre ' + richtig)
      end;

So müsste es zumindest bei Delphi 5 gehen^^ wichtig ist das bei dem end vor dem else kein „;“ hindarf.

MfG

Richard

3

das selbe wieder:)

[code]//überpfüft die Option
if radioButton1.Checked then
begin

//überprüfen ob eingabe bei edit1 richtig ist
richtig := englisch.Strings[NR];
if edit1.text = englisch.Strings[NR] then
begin
showmessage(’ richtig ');
randomize ;
Nr := random(german.count);
panel1.caption := german.Strings[NR]
end
else
begin
showmessage(‚Flasch richtig wäre ’ + richtig)
end
end
else
begin
showmessage(‘ richtig ');
randomize ;
Nr := random(german.count);
panel1.caption := englisch.Strings[NR]
end
else
begin
showmessage('Flasch richtig wäre ’ + german.Strings[NR])
end;
end;[/code]

Komm wieder nicht auf den Fehler

4

Hallo,

also ich sehe auf den ersten Blick keinen Fehler. Schreib doch mal was passieren sollte und was stattdessen passiert.

N43