AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Object-Pascal / Delphi-Language Delphi Edit Eingabe Vergleich / String aus Text File
Thema durchsuchen
Ansicht
Themen-Optionen

Edit Eingabe Vergleich / String aus Text File

Ein Thema von torro · begonnen am 23. Okt 2010 · letzter Beitrag vom 23. Okt 2010
 
torro

Registriert seit: 16. Sep 2010
37 Beiträge
 
#1

Edit Eingabe Vergleich / String aus Text File

  Alt 23. Okt 2010, 17:57
Delphi-Version: 7
Hi,
folgendes Problem:
Ich bastel zur Zeit an nem Quiz für die Schule und habe als einen von mehreren Fragetypen auch eine Eingabefrage. Sprich es wird eine Frage angezeigt und die Antwort wird in ein Editfeld eingegeben.
Angeschlossen ist daran ist natürlich eine Auswertung der Antwort (sofort nach der Eingabe mit Button Click). Diese funktioniert an und für sich gut. Jetz kommt das Problem:
ist die Antwort eine Zahl, z.B. " Wie viele Aggregatzustände gibt es?" - "3" wird die Antwort immer FALSCH gewertet (hab mir die Auswertung zur Kontrolle auf das Form gelegt).
Die Zahlen durch Wörter esetzen hat leider auch keinen Sinn.

hier mal der Code zur Auswertung:


Delphi-Quellcode:
var Richtig1, FrageStr, Schluessel : string
// FrageStr und Schluessel könnt ihr eig ignorieren
...
IF EditEingabe.text=Richtig1
    then
        begin
            label7.Caption:='richtig';
            assignFile (outfile, EditSchuelername.Text + '.txt');
            reset (outfile);
            append (outfile);
            writeln (outfile, FrageStr);
            writeln (outfile, Schluessel);
            writeln (outfile, 'Richtig');
            closefile(outfile);
        end
    else
         begin
            label7.caption:='falsch';
            assignFile (outfile, EditSchuelername.Text + '.txt');
            reset (outfile);
            reset (outfile);
            append (outfile);
            writeln (outfile, FrageStr);
            writeln (outfile, Schluessel);
            writeln (outfile, 'Falsch');
            closefile (outfile);
        end;
Wie ihr sehen könnt wird dann das Ergebniss in ein Textfile geschrieben (funktioniert). So, jetz meine Frage/Bitte. Wieso werden keine Zahlen verglichen. Und wie bekomm ich hin das sie es werden? Sind ja letztenendes auch nur Strings. zeichen die wie Zahlen aussehen.

Danke
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 04:19 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz