Ich habe eine Textdatei die ich auslesen lassen mächte ! das ist für so ein kleines haushaltsbuch:
Delphi-Quellcode:
DateiName := OpenDialog1.FileName ;
ChecklisteEin.Lines.LoadFromFile(OpenDialog1.FileName); // ChecklisteEin ist ein Memo wo alles aus txt datei angezeigt wird
AssignFile (Datei, DateiName);
Reset (Datei);
for i := 1 To Max do
begin
ReadLn (Datei, zeile1);
ReadLn (Datei, (zeile2)+1);
Jetzt sieht der text in der datei so aus:
ChecklisteEin
Fernseher
-500
Gehalt
1500
um die schleife (oben , for i =...) zu durchlaufen muss ich eine konstate angeben! jetzt wollte ich schreiben
const Max : Ln / 2
aber das geht nicht
ich möchte nämlich die Geldwerte erkennen lassen so das ich die zusammenrechnen kann, wie erkennt delphi, das es z.B. wie in diesem beispiel 2 werte sind und das er dann 1000 ausgibt???
[edit=Sharky]Delphi-Tags gesetzt. Mfg, Sharky[/edit]