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

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

Old	New		Line
1	1		## 2D - Dateien
2	2
3	3		(Autor: Tao Yue, Übersetzung ins Deutsche)
4	4
5	5		Das Lesen aus einer Datei anstelle der Konsole (Tastatur) ist möglich:
6	6
7	7		``` pascal
8	8		read (file_variable, argument_list);
9	9		write (file_variable, argument_list);
10	10		```
11	11
12	12		Ähnlich ist es mit `readln` und `writeln`. file_variable wird wie folgt deklariert:
13	13
14	14		``` pascal
15	15		var
16	16		...
17	17		filein, fileout : text;
18	18		```
19	19
20	20		Der Datentyp `text` zeigt an, dass es sich bei der Datei um reinen Text handelt.
21	21
22	22		Nachdem 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:
23	23
24		-	~~`reset (file_variable, 'filename.extension');`\~~
25		-	~~`rewrite (file_variable, 'filename.extension');`~~
	24	+	```
	25	+	reset (file_variable, 'filename.extension');
	26	+	rewrite (file_variable, 'filename.extension');
	27	+	```
26	28
27	29		`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.
28	30
29	31		Turbo 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.
30	32
31	33		``` pascal
32	34		assign (file_variable, 'filename.extension');
33	35		reset (file_variable);
34	36		```
35	37
36	38		Die 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.
37	39
38	40		Nachdem Sie mit der Datei fertig sind, können Sie sie schließen:
39	41
40	42		``` pascal
41	43		close (File_Identifier);
42	44		```
43	45
44	46		Hier 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:
45	47
46	48		``` pascal
47	49		program CopyOneByteFile;
48	50
49	51		var
50	52		mychar : char;
51	53		filein, fileout : text;
52	54
53	55		begin
54	56		assign (filein, 'c:\file1.txt');
55	57		reset (filein);
56	58		assign (fileout, 'c:\file2.txt');
57	59		rewrite (fileout);
58	60		read (filein, mychar);
59	61		write (fileout, mychar);
60	62		close(filein);
61	63		close(fileout)
62	64		end.
63	65		```
64	66
65	67		---
66	68		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