Woher soll ich das wissen, ich weiß doch nicht, was Du geschrieben hast?
Hoffe ich habe es richtig gemacht, habs so geschrieben:
Delphi-Quellcode:
if IntToStr(Ergebnis) = EditZahl5.Text then
begin
if InttoStr(gggT) = EditZahl6.Text then
Showmessage('Sehr gut gemacht, weiter so!!!')
else
showmessage('Das war nicht richtig, versuch es noch einmal!') ;
end
else
showmessage('Fast richtig, probier es noch einmal!') ;
begin
if InttoStr(gggT) = EditZahl6.Text then
showmessage('Der Nenner ist richtig, nur der Zähler ist falsch!')
else
showmessage ('Das war nicht richtig, versuch es noch einmal!') ;
end;