Pointer/fr: what changed

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

Old	New		Line
1		-	\
2		-
3	1		# Généralités sur les pointeurs
4	2
5	3		Ce que sont les pointeurs :
6	4
7	5		- Un pointeur est une référence à un emplacement mémoire.
8	6		- Un pointeur est du type de données entier qui stocke une adresse de mémoire.
9	7		- Un pointeur désigne le premier octet d'une variable ou un objet.
10	8		- La taille d'un pointeur dépend du processeur et du système d'exploitation, soit 4 ou 8 octets.
11	9
12	10		Exemple:\
13	11
14	12		``` pascal
15	13		var
16	14		ptr1: ^Integer; // typé
17	15		ptr2: Pointer; // non typé
18	16		```
19	17
20	18		Travailler avec des pointeurs typés est plus rapide qu'avec des pointeurs non typés.\
21	19		Cependant les pointeurs non typés sont plus flexibles car non liés à un type particulier.\
22	20		==Pointeur typé== Exemple d'utilisation d'un pointeur typé sur un type de donnée simple :
23	21
24	22		``` pascal
25	23		var
26	24		a, b: Integer; // "a" et "b" sont des variable de type Integer.
27	25		p: ^Integer; // "p" est un pointeur, il peut accueillir l'adresse d'une variable du type Integer.
28	26		begin
29	27		a := 500; // Affectation d'une valeur correcte à la variable "a".
30	28		p := @a; // La variable "p" de type Pointer reçoit maintenant l'adresse qui a été attribuée à la variable "a".
31	29		b := p^; // La variable "b" de type entier récupère la valeur à l'adresse données par "p" soit celle de la variable "a".
32	30		p := nil; // La variable "p" ne référence dorénavant plus rien.
33	31		// Le pointeur "p" pourra désigner une nouvelle adresse de mémoire.
34	32		end;
35	33		```
36	34
37	35		> Warning: Tout tentative d'accès à l'espace mémoire via un pointeur valant Nil provoque une erreur à l'exécution.
38	36
39	37		Exemple d'utilisation d'un pointeur typé sur un enrtegistrement :
40	38
41	39		``` pascal
42	40		type
43	41		TNewRecord = record
44	42		Wert1: ShortString;
45	43		Wert2: ShortString;
46	44		Wert3: ShortString;
47	45		end;
48	46		var
49	47		p: ^TNewRecord;
50	48		begin
51	49		New(p); // Allocation de mémoire pour un variable de type TNewRecord.
52	50		p^.Wert1 := 'Test'; // Affectation d'un champ de donnée du TNewRecord par le pointeur.
53	51		p^.Wert2 := 'TestTest'; // Affectation d'un champ de donnée du TNewRecord par le pointeur.
54	52		p^.Wert3 := 'TestTestTest'; // Affectation d'un champ de donnée du TNewRecord par le pointeur.
55	53		Dispose(p); // Libération de la mémoire allouée au TNewRecord.
56	54		// Les valeurs des champs de données sont alors perdues.
57	55		end;
58	56		```
59	57
60	58		## Pointeur non typé
61	59
62	60		Exemple de définition d'un pointeur non typé :
63	61
64	62		``` pascal
65	63		var
66	64		ptr2: Pointer;
67	65		```
68	66
69	67		Nouvelle allocation et libération de la mémoire :\
70	68
71	69		``` pascal
72	70		begin
73	71		...
74	72		GetMem(ptr2,4); // Integer est de 32 Bit, donc une taille de 4 octets
75	73		Integer(ptr2^) := 2048; // Affectation de la valeur
76	74		FreeMem(ptr2); // Libération de la mémoire
77	75		...
78	76		end;
79	77		```
80	78
81	79		## Types de pointeurs typés prédéfinis
82	80
83	81		Il existe, par exemple dans Free Pascal et autres, les pointeurs prédéfinis suivants.
84	82
85	83		- Pour les type caractères :
86	84		- PChar (Pointeur pour le type de donnée Char)
87	85		- PAnsiChar (Pointeur pour le type de donnée AnsiChar)
88	86		- PWideCahr (Pointeur pour le type de donnée WideChar)
89	87		- PUnicodeChar (Pointeur pour le type de donnée UnicodeChar)
90	88		- Pour les types entiers non signés :
91	89		- PByte (Pointeur pour le type de donnée Byte)
92	90		- PWord (Pointeur pour le type de donnée Word)
93	91		- PDWord (Pointeur pour le type de donnée DWord)
94	92		- PCardinal (Pointeur pour le type de donnée Cardinal)
95	93		- PLongword (Pointeur pour le type de donnée Longword)
96	94		- Pour les types entiers signés :
97	95		- PShortint (Pointeur pour le type de donnée Shortint)
98	96		- PSmallint (Pointeur pour le type de donnée Smallint)
99	97		- PInteger (Pointeur pour le type de donnée Integer)
100	98		- PLongint (Pointeur pour le type de donnée Longint)
101	99		- PInt64 (Pointeur pour le type de donnée Int64)
102	100		- Pour les types réels flottants :
103	101		- PSingle (Pointeur pour le type de donnée Single)
104	102		- PDouble (Pointeur pour le type de donnée Double)
105	103		- PExtended (Pointeur pour le type de donnée Extended)
106	104		- PComp (Pointeur pour le type de donnée Comp)
107	105		- PCurrency (Pointeur pour le type de donnée Currency)
108	106
109	107		Exemple de définitions de pointeurs typés:\
110	108		Exemple 1:
111	109
112	110		``` pascal
113	111		var
114	112		ptr1: ^Integer; // créé un pointeur typé pour le type de donnée Integer
115	113		```
116	114
117	115		Allocation et libération de mémoire :
118	116
119	117		``` pascal
120	118		begin
121	119		...
122	120		New(ptr1); // Réserve un emplacement de mémoire pour stocker sa valeur
123	121		ptr1^ := 1; // Affecte la valeur à l'emplacement mémoire
124	122		Dispose(ptr1) // libère la mémoire pour un usage ultérieur
125	123		// ce qui veur dire que la valeur est perdue
126	124		...
127	125		end;
128	126		```
129	127
130	128		Exemple 2:
131	129
132	130		``` pascal
133	131		function funTest: string;
134	132		var
135	133		ptrZeiger: PInteger; // Type prédéfini de pointeur sur Integer dans Free Pascal
136	134		{ on pourrait déclarer de manière équivalente : ptrZeiger: ^Integer }
137	135		intZahl: Integer;
138	136		begin
139	137
140	138		result:= '';
141	139		intZahl := 4; // une valeur pour la variable
142	140
143	141		ptrZeiger := @intZahl; // le pointeur désigne maintenant la variable IntZahl
144	142		result := Inttostr(ptrZeiger^); // Retourne la valeur désignée par ptrZeiger soit aussi celle de intZahl.
145	143
146	144		end;
147	145		```
148	146
149	147		# Liens externes
150	148
151	149		Pour comprendre la notion de pointeur, vous pouvez lire cette excellente introduction aux [pointeurs (fr)](http://fbeaulieu.developpez.com/guide/9-pointeurs.html)
152	150
153	151		---
154	152		From the Free Pascal wiki, page "Pointer/fr", as it stood on 2020-02-23 after a change by Trev, 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