Sign in Join
Wiki copytemporary

Basic Pascal Tutorial/Chapter 2/Files/de: what changed

Revision 2 to 3. Removed lines have a minus sign; added lines have a plus sign.

OldNewLine
11## 2D - Dateien
22
33*(Autor: Tao Yue, Übersetzung ins Deutsche)*
44
55Das Lesen aus einer Datei anstelle der Konsole (Tastatur) ist möglich:
66
77``` pascal
88read (file_variable, argument_list);
99write (file_variable, argument_list);
1010```
1111
1212Ähnlich ist es mit `readln` und `writeln`. file_variable wird wie folgt deklariert:
1313
1414``` pascal
1515var
1616 ...
1717 filein, fileout : text;
1818```
1919
2020Der Datentyp `text` zeigt an, dass es sich bei der Datei um reinen Text handelt.
2121
2222Nachdem wir eine Variable für die Datei deklariert haben und bevor wir von ihr lesen oder in sie schreiben, müssen wir die Variable dem Dateinamen auf der Festplatte zuordnen und die Datei öffnen. Dies kann auf zwei Arten geschehen. Typischerweise:
2323
24-```
24+```text
2525reset (file_variable, 'filename.extension');
2626rewrite (file_variable, 'filename.extension');
2727```
2828
2929`reset` öffnet eine Datei zum Lesen, und rewrite öffnet eine Datei zum Schreiben. Eine mit `reset` geöffnete Datei kann nur mit `read` und `readln` verwendet werden. Eine mit `rewrite` geöffnete Datei kann nur mit `write` und `writeln` verwendet werden.
3030
3131Turbo Pascal führte die Zuweisungsnotation ein. Zuerst weisen Sie einer Variablen einen Dateinamen zu, dann rufen Sie `reset` oder `rewrite` nur mit der Variablen auf.
3232
3333``` pascal
3434assign (file_variable, 'filename.extension');
3535reset (file_variable);
3636```
3737
3838Die Darstellung des Pfades ist je nach Betriebssystem unterschiedlich. Windows verwendet Backslashes und Laufwerksbuchstaben aufgrund seiner DOS-Erfahrung (z.B. `c:\directory\name.pas`), während macOS und Linux aufgrund ihrer UNIX-Herkunft Schrägstriche verwenden.
3939
4040Nachdem Sie mit der Datei fertig sind, können Sie sie schließen:
4141
4242``` pascal
4343close (File_Identifier);
4444```
4545
4646Hier ist ein Beispiel für ein Programm, das Dateien verwendet. Dieses Programm wurde für Turbo Pascal und DOS geschrieben und erzeugt file2.txt mit dem ersten Zeichen aus file1.txt:
4747
4848``` pascal
4949program CopyOneByteFile;
5050
5151var
5252 mychar : char;
5353 filein, fileout : text;
5454
5555begin
5656 assign (filein, 'c:\file1.txt');
5757 reset (filein);
5858 assign (fileout, 'c:\file2.txt');
5959 rewrite (fileout);
6060 read (filein, mychar);
6161 write (fileout, mychar);
6262 close(filein);
6363 close(fileout)
6464end.
6565```
6666
6767---
6868*From the Free Pascal wiki, page "Basic Pascal Tutorial/Chapter 2/Files/de", as it stood on 2022-08-20 after a change by Kai Burghardt, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's [[Licensing]] page. If you have concerns about this material, [message the admin](/wiki-contact).*

Back to history