Thema: Delphi Datei auswerten

Einzelnen Beitrag anzeigen

Benutzerbild von glkgereon
glkgereon

Registriert seit: 16. Mär 2004
2.287 Beiträge
 
#19

Re: Datei auswerten

  Alt 9. Sep 2004, 15:53
du kannst sie DIREKT auswerten, und dann nur den mittelwert in nem array speichern, oder sogar den direkt in ne datei schreiben...

so in etwa:
Delphi-Quellcode:
while not eof(logdatei)do
  begin
  holzeile(temp);
  wertezeileaus(temp);
  end;
dein holzeile:

Delphi-Quellcode:
readln(datei,temp);
result:=temp;
dann dein wertezeileaus:

Delphi-Quellcode:
zerlegezeile(line, teil1, teil2, teil3);
if (strtoint(teil)>10) and (strtoint(tei3)>10) and (strtoint(tei3)>10)
then
  begin
  mittelwerte[anzahl+1]:=(strtoint(teil)+strtoint(tei2)+strtoint(tei3))/3;
  anzahl:=anzahl+1;
  end;
so, temp isn string, teil1-3 auch
mittelwerte isn array of double/extended/was auch immer
anzahl die anzahl der mittelwerte -> integer

der rest is deine aufgabe, zb zerlegezeile
»Unlösbare Probleme sind in der Regel schwierig...«
  Mit Zitat antworten Zitat