Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Schulprojekt - Vokabeltrainer


evilboyjunior - Di 17.06.08 09:07
Titel: Schulprojekt - Vokabeltrainer
Hey Leute,
ich beschäftige mich seit ca. nem Jahr mit Delphi auf Grund meines Schulgangs den ich mache. Und nu muss ich für die Schule ein Projekt anfertigen - einen Vokabeltrainerenglisch hab ich mir gedacht, das ist nichts besonderes, aber es ist immerhin etwas womit die Schule was anfangen kann.

Gedacht habe ich mir das ungefähr so:

Es gibt ein Formular mit 3 verschiedenen Auswahlmodi:

Substantive
Verben
Adjektive

Dafür wollte ich 3 Textdateien erstellen die beliebig erweiterbar sind und wo natürlich schon diverse Vokabeln drin stehen.
Da ich aber wohl die Unterrichtsstunde verschlafen hab in der diese besagten Textdateien behandelt wurden komm ich da momentan nicht wirklich weiter.
Ich möchte vorerst versuchen vom Programm selbst die Datei erstellen zu lassen (hierbei gleich die Frage: Wird der Pfad dann vom Programm fest gelegt?). Nachdem die Datei erstellt wurde soll sie beliebig oft wieder aufrufbar sein und erweiterbar sein.

Wie ungefähr stell ich das an?

Danke für eure Hilfe

evilboyjunior


ZeitGeist87 - Di 17.06.08 09:26

Hallo!

Spontan fällt mir dazu Suche in der Entwickler-Ecke TSTRINGLIST ein.

Liste anfertigen, abspeichern, laden und bearbeiten - alles, was dein Herz begehrt.


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
var Liste: TStringList;
begin
 //Liste erzeugen
 Liste:= TStringList.create;
 //Wert hinzufügen
 Liste.add('Bla');
 //Im selben Pfad speichern, in der das Programm liegt
 Liste.SaveToFile(extractfilepath(application.exename) + 'Vokabular.txt');
 //Wenn Liste nicht mehr benötigt wird
 FreeAndNil(Liste);
end;


LG
Stefan


evilboyjunior - Di 17.06.08 09:53

Ja das sieht ganz interessant aus, aber íst das jetzt auch in Delphi 7 verwendbar? Hätte ich vielleicht noch dazu sagen sollen :).
Ich hab den Code jetzt mal so übernommen und zumindest bei dem letzten Befehl meckert Delphi micht an, wegens undeffinierter Bezeichner unso.

Danke für eure Hilfe

evilboyjunior


ZeitGeist87 - Di 17.06.08 10:04

Ja, das geht auch in Delphi 7.'
Hab ich auch.

Zum Fehler: Mea culpa!

Habs oben verbessert!