Sign in Join
Wiki copytemporary

$include/de: what changed

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

Title: $include/de

OldNewLine
1+## \$I oder \$INCLUDE
2+
3+Die Direktive \$INCLUDE oder \$I dient dem Einfügen einer Datei.\
4+Die Direktive \$INCLUDE oder \$I fügt an der Stelle an der die Anweisung steht eine Datei ein.\
5+Falls die einzufügende Datei keine Dateiendung hat, dann sucht der Compiler nach einer Datei mit der Endung .pp.\
6+Die Anzahl der einzufügenden Dateien ist auf die Anzahl der verfügbaren file descriptors des Free Pascal Compilers beschränkt.\
7+\
8+Beispiel:\
9+
10+``` pascal
11+{$INCLUDE test1.pas} // sucht im aktuellen Verzeichnis nach der Datei test1.pas
12+{$INCLUDE ../test2.pas} // sucht im übergeordneten Verzeichnis nach der Datei test2.pas
13+```
14+
15+## \$I und \$INCLUDE
16+
17+Die Direktiven \$I und \$INCLUDE haben die gleiche Bedeutung.\
18+Die Direktiven \$I und \$INCLUDE unterstützen die gleichen Bezeichner.\
19+\
20+Die Direktiven kennen folgende Bezeichner:\
21+
22+<table>
23+
24+<tr>
25+
26+<td>
27+
28+TIME
29+
30+</td>
31+
32+<td>
33+
34+Gibt das aktuelle Datum und die aktuelle Zeit aus.
35+
36+</td>
37+
38+</tr>
39+
40+<tr>
41+
42+<td>
43+
44+DATE
45+
46+</td>
47+
48+<td>
49+
50+Fügt das aktuelle Datum ein.
51+
52+</td>
53+
54+</tr>
55+
56+<tr>
57+
58+<td>
59+
60+FPCTARGET
61+
62+</td>
63+
64+<td>
65+
66+Fügt den Namen des Zielprozessors ein. Dieser Bezeichner ist deprecated (hinfällig). Der neue Bezeichner heisst FPCTARGETCPU.
67+
68+</td>
69+
70+</tr>
71+
72+<tr>
73+
74+<td>
75+
76+FPCTARGETCPU
77+
78+</td>
79+
80+<td>
81+
82+Fügt den Namen des Zielprozessors ein.
83+
84+</td>
85+
86+</tr>
87+
88+<tr>
89+
90+<td>
91+
92+FPCTARGETOS
93+
94+</td>
95+
96+<td>
97+
98+Fügt den Namen des Zielbetriebsystems ein.
99+
100+</td>
101+
102+</tr>
103+
104+<tr>
105+
106+<td>
107+
108+FPCVERSION
109+
110+</td>
111+
112+<td>
113+
114+Fügt die aktuelle Compilerversion ein.
115+
116+</td>
117+
118+</tr>
119+
120+<tr>
121+
122+<td>
123+
124+FILE
125+
126+</td>
127+
128+<td>
129+
130+Dateiname, in der die Direktive steht.
131+
132+</td>
133+
134+</tr>
135+
136+<tr>
137+
138+<td>
139+
140+LINE
141+
142+</td>
143+
144+<td>
145+
146+Nummer der Zeile, in der die Direktive steht.
147+
148+</td>
149+
150+</tr>
151+
152+<tr>
153+
154+<td>
155+
156+CURRENTROUTINE
157+
158+</td>
159+
160+<td>
161+
162+Name der aktuellen Routine.
163+
164+</td>
165+
166+</tr>
167+
168+</table>
169+
170+Andere Bezeichner werden aus den Umgebungsvariablen des Compiler Prozesses genommen.\
171+Beispiel:
172+
173+``` pascal
174+Program InfoDemo;
175+begin
176+ WriteLn('Compilierzeit: ' + {$I %TIME%});
177+ WriteLn('Compilierdatum: ' + {$I %DATE%});
178+ WriteLn('Erforderliche CPU: ' + {$I %FPCTARGETCPU%});
179+ WriteLn('Erforderliche CPU (veraltet): ' + {$I %FPCTARGET%});
180+ WriteLn('Betriebssystem: ' + {$I %FPCTARGETOS%});
181+ WriteLn('FPC Version: ' + {$I %FPCVERSION%});
182+ WriteLn('Name der Datei: ' + {$I %FILE%});
183+ WriteLn('Aktuelle Zeile als String: ' + {$I %LINE%});
184+ WriteLn('Aktuelle Zeile als Int: ' + IntToStr({$I %LINENUM%}));
185+ WriteLn('Compilierer: ' + {$I %USER%});
186+ WriteLn('Home-Ordner des Benutzers: ' + {$I %HOME%});
187+ WriteLn('Name der aktuellen Routine: ' + {$I %CURRENTROUTINE%});
188+end.
189+```
190+
191+\
192+\
193+Hinweis: Für Infos über Lazarus, kann die Unit <b>LCLVersion</b> eingebunden werden.
194+
195+---
196+*From the Free Pascal wiki, page "$include/de", as it stood on 2022-04-09 after a change by PascalDragon, 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