Discussion :

[So_nya]

Salut,
j'ai ecris un programme simple en turbo pascal,à l'execution Le curseur s’arrête à writeln(p) ; et affiche le message d’erreur suivant :
ERROR 64 cannot read or write variable of this type
Et Je voudrais s’il vous plait l'instruction pour afficher l’adresse de (p) .
Please help me.
Voila mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
program exemple1; 
 
type
  pinteger = ^integer; 
 
var
  q : integer; 
  p : pinteger; 
 
begin 
  p:=nil; 
  q:=100; 
  new(p); 
  p^:=q; 
  writeln(p^); 
  writeln(p); 
end.

[droggo]

Gio,

Pour le code, pense à utiliser les balises [ code] [ /code] (sans les espaces qui ne sont là que pour les invalider).

En effet, TP ne sait pas écrire les variables de type pointeur. il faut donc le transtyper en un type de longueur compatible, en l'occurrence, un LongInt :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
...
WriteLn(LongInt(p));
...

D'autre part, quand on réserve de la place avec New, il faut libérer cette place mémoire avec Dispose:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
...
  New(p);
...
  Dispose(p);
 
  { ------------------------------------------------------ 
    à partir d'ici, le pointeur p est invalide, et on ne doit plus
    chercher à accéder à la mémoire sur laquelle il pointait
     ----------------------------------------------------- }
...
end.