sVarstringchecks/de: what changed

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

Title: sVarstringchecks/de

New		Line
1	+	Zurück zu den [[local compiler directives/de\|lokalen Compiler Direktiven]].\
2	+
3	+	==\$VARSTRINGCHECKS und \$V== Die Compiler Direktiven \$VARSTRINGCHECKS und \$V sind in Ihrer Verwendung Synonym.\
4	+	Die Compiler Direktive \$VARSTRINGCHECKS, legt fest, wie streng der Compiler bei der Prüfung von Zuweisungen von Datentypen vom Typ String ist.\
5	+	Die Compiler Direktive \$V kennt zwei Schalter + und -.\
6	+	Die Compiler Direktive \$VARSTRINGCHECKS kennt zwei Schalter ON und OFF.\
7	+
8	+	Beispiel für einen Fehler:
9	+
10	+	{$V+} // Schaltet die strenge Zuweisungskontrolle ein
11	+
12	+	procedure subTest(var strUebergabe: shortString);
13	+	begin
14	+	showmessage(strUebergabe);
15	+	end;
16	+
17	+	procedure TForm1.Button1Click(Sender: TObject);
18	+	var
19	+	strWert : String[12];
20	+	begin
21	+	strWert:='123456789012';
22	+	subTest(strWert);
23	+	end;
24	+
25	+	Das obige Beispiel erzeugt folgende Fehlermeldung:\
26	+	unit1.pas(45,20) Error: String types have to match exactly in \$V+ mode\
27	+
28	+	Die Fehlermeldung kommt daher, das beide Strings zwar vom Datentyp shortstring sind, aber eine unterschiedliche Länge haben.\
29	+
30	+	Beispiel für ein fehlerfreies compilieren:
31	+
32	+	{$V-} //Schaltet die strenge Zuweisungskontrolle aus
33	+
34	+	procedure subTest(var strUebergabe: shortString);
35	+	begin
36	+	showmessage(strUebergabe);
37	+	end;
38	+
39	+	procedure TForm1.Button1Click(Sender: TObject);
40	+	var
41	+	strWert : String[12];
42	+	begin
43	+	strWert:='123456789012';
44	+	subTest(strWert);
45	+	end;
46	+
47	+	--Olaf 10:17, 27 January 2013 (UTC)
48	+
49	+	---
50	+	From the Free Pascal wiki, page "sVarstringchecks/de", as it stood on 2013-04-21 after a change by Olaf, 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).
51	+	Category: Free Pascal Programmers Guide/de

Back to history