Hallo, ich hätte da mal eine kleine Frage und hoffe, dass ihr mit dabei helfen könnt.
Folgendes: Ich habe ein Programm geschrieben, dass mir verschiedene Touren und deren Gesamtlänge ausgibt. Nun möchte ich die Zwischen- und Endergebnisse in eine einfache Textdatei schreiben. Das hatte ich mir so vorgestellt:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
| procedure schreiben;
var ausgabe: textfile;
i: integer;
begin
assign(ausgabe,'daten.txt');
append(ausgabe);
for i:=1 to ak+1 do
begin
write(ausgabe,tour[i]:5);
end;
writeln(ausgabe,' ',dist:5:2);
close(ausgabe);
end; |
Aber wenn jetzt die eine Tour 5 Orte umfasst und die nächste nur 3, dann wird die nicht einfach nur angehangen, sondern übernimmt die letzten beiden orte der vorherigen auch noch. Also so meinetwegen: tour1: 5-4-3-2-1 tour2: 1-2-3 gibt in der textdatei dann
5 4 3 2 1,
1 2 3 2 1
das ist ja irgendwie nicht so schön...ok, wo ich bei schön bin...nebenbei gefragt, wie bekomme ich es hin, dass eine Lehrzeile eingefügt wird, damit in der Datei nicht alles untereinander steht?
ich hoffe, ihr könnt mir helfen
Moderiert von 
matze: Delphi-Tags hinzugefügt
