Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Quiz (https://www.delphipraxis.net/139982-quiz.html)

DeddyH 10. Sep 2009 12:08

Re: Quiz
 
Nimm doch einfach verschiedene Inis.

TeronG 10. Sep 2009 12:13

Re: Quiz
 
Jo kannst einfach nen editor nehmen.
Die ini muss du auch nicht '*.INI' nennen. Kann auch ruhig *.txt, *.dat, ... heißen.

Zitat:

Zitat von DeddyH
Nimm doch einfach verschiedene Inis.

Entweder das oder du unterteilst deinen "Sectionname".

z.B.: Frage_<stufe>_<nummer>
[Frage_1_1]
[Frage_1_2]
[Frage_1_3]
[Frage_2_1]
...

DeddyH 10. Sep 2009 12:19

Re: Quiz
 
Trotzdem denke ich, dass es (zumindest am Anfang) mit verschiedenen Dateien einfacher zu realisieren ist. Und bevor weitere Fragen kommen, verweise ich vorsorglich auf das Ini-Tutorial ;).

Mothergrayham 10. Sep 2009 19:50

Re: Quiz
 
so ich hab jetzt eine ini datei gemacht. hab sie frage.ini genannt.

wie und wo kann ich jetzt machen das delphi jetzt auf die ini datei zugreift?

im Delphi programm hab ich jetzt ein editfeld gemacht wo die frage erscheinen soll wenn man auf den startbutton drückt. und dann sollen die antworten auf den 4 vorbereiteten panels erscheid.

haentschman 10. Sep 2009 19:58

Re: Quiz
 
arbeite bitte das INI Tutorial durch.
Da klären sich deine Startprobleme von selbst. 8)

Mothergrayham 10. Sep 2009 20:58

Re: Quiz
 
kann ja sein das ich zu doof für delphi bin. hab mir das ini tutorial min. 5 mal durchgelesen und verstehe nur bahnhof und kofferklau.

ich find oder besser verstehe nicht wo ich jetzt die ini datei mit delphi zusammen bringe.

Rakshasa 10. Sep 2009 21:04

Re: Quiz
 
Irgendwie kann ich kaum glauben, dass Dein Lehrer einfach nur "ein Projekt" als Hausaufgabe gibt, ohne irgendwelche Hilfestellung dazuzugeben? Warum fragst Du nicht noch Deinen Lehrer, ob er Dir Unterlagen o.Ä. geben kann?

Etwas Eigeninitiative wird hier im Allgemeinen recht gern gesehen ;)

Mothergrayham 10. Sep 2009 21:10

Re: Quiz
 
unser lehrer ist manchmal etwas verwirrt das ist ja das problem *lol*

in erster linie geht es mir ja um die ini datei. finde die antworten ja auch alle super.

dann hab ich mal ne frage zu dieser aussage die hier schon gefallen ist:

Am Anfang liest du per

Delphi-Quellcode:
Ini.ReadInteger('ALLGEMEIN','AnzahlFragen',0)
aus, wie viele Fragen in der Ini-Datei stehen und merkst dir diesen Wert.



Was ist mit anfang gemeint?

patti 11. Sep 2009 10:18

Re: Quiz
 
Obwohl die DP kein "Hausaufgabenforum" ist, in dem deine Aufgaben erledigt werden, geb ich dir hier mal etwas "Starthilfe":

Binde unter uses (ganz oben in der Unit) die Unit IniFiles ein. Dann deklarierst du dir eine Methode von deinem Hauptformular, etwa im public-Abschnitt:

Delphi-Quellcode:
procedure LoadQuestions;
Die Procedure könnte z.B. so ausschauen:

Delphi-Quellcode:
procedure TFrom1.LoadQuestions;
var ini   : TIniFile;
var anzahl : integer;
var i     : integer;
var Frage : string;
var Antw1  : string;
var Antw2  : string;
var Antw3  : string;
var Antw4  : string;
var Richtig : integer;
begin
     //--
     ini := TIniFile.Create(ExtractFilePath(Application.ExeName) + 'questions.ini');
     // ExtractFilePath(..) liefert Pfad der EXE-Datei
     //
     try
       anzahl := Ini.ReadInteger('ALLGEMEIN','AnzahlFragen',0);
       //
       if anzahl > 0 then
       begin
           for i := 1 to anzahl do
           begin
                Frage := Ini.ReadString('FRAGE'+IntToStr(i),'Frage','');
                Antw1 := Ini.ReadString('FRAGE'+IntToStr(i),'Antwort1','');
                Antw2 := Ini.ReadString('FRAGE'+IntToStr(i),'Antwort2','');
                Antw3 := Ini.ReadString('FRAGE'+IntToStr(i),'Antwort3','');
                Antw4 := Ini.ReadString('FRAGE'+IntToStr(i),'Antwort4','');
                Richtig := Ini.ReadInteger('FRAGE'+IntToStr(i),'Antwort4',0);
                // an diser Stelle musst du dir ueberlegen, was du mit den geladenen Daten anfaengst
           end;
       end;
     finally
       Ini.Free;
     end;
end;
(Den Quelltext hab ich nur schnell im Textditor geschrieben und nicht getestet, könnten also noch Tippfehler oder andere Fehler drin sein! Du musst ihn außerdem evtl. noch an den Aufbau deiner Ini-Datei anpassen.)

Die Procedure macht nichts anderes als das Lesen der Fragen und Antworten, die Fragen werden jedoch nirgends "weiterverwendet". Weiter oben habe ich bereits ein "Array of Record" genannt, in dem man alle Fragen speichern könnte. Da das hier aber eben kein Hausaufgabenforum ist, musst du dich um diesen Teil erstmel selber kümmern oder bei konkreten Fragen diese hier stellen.

Noch ein Hinweis: Du hast zwar jetzt einen Code, der das Laden der Fragen übernimmmt, aber ich gehe davon aus, dass du ihn nicht auf Anhieb verstehts. Daher mein Tipp: Kopiere ihn nicht einfach in dein Projekt, sondern gehe den Code komplett durch und versuche ihn wirklich zu verstehen, dabei solltest du einiges lernen, was du vielleicht später noch einmal gebrauchen kannst.

TeronG 14. Sep 2009 10:48

Re: Quiz
 
Evtl. kannste mit dem Tutorial mehr anfangen!?


Alle Zeitangaben in WEZ +1. Es ist jetzt 05:42 Uhr.
Seite 2 von 2     12   

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