ich muss für die schule ein programm schreiben, in welchen ich auch externe listen verwende. ich muss wissen wie man auf eine textdatei zugreift, jede zeile einer zeile in einer listbox zuordnet und wie ich die textdatei erweitern kann.
ich habe ein kleines beispielprogramm geschrieben, welches leider nicht läuft, ich hab keine ahnung warum. hierbei soll auf knopfdruck einer listbox zeilenweise der inhalt einer textdokumentes zugewiesen werden.
der quellquode sieht wie folgt aus
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
| var tex:TextFile;
s:String;
begin
AssignFile(tex,'tmp.txt');
{$i-}Reset(tex);{$i+}
while not eof(tex) do
begin
Writeln(tex,s);
Form1.bude.Items.Add(s);
end;
CloseFile(tex); |
beim compilen erhalte ich keine fehler wenn ich jedoch auf den button clicke erhalte ich eine fehlermeldung (Klasse EInOut Fehler; E/AFehler 105)
Wie muss das programm geändert werden damit es funktioniert? wie kann man datein erweitern? welche befehle brauche ich dazu?
Moderiert von 
raziel: Delphi-Tags hinzugefügt.
