probleme pour convertir Ptr du Delphi en BCB

Bonsoir
Je tente de traduire un code Delphi, il y a une fonction sur laquelle je bute

Citation:

---

for i:=$f0000 to $fffff do md[i]:=byte(Ptr(i)^);

---

j'ai regarde dans l'aide en ligne Delphi et j'ai ceci qui ne m'aide pas plus

Citation:

---

Convertit l'adresse spécifiée en pointeur.
Syntaxe Delphi :
function Ptr(Address: Integer): Pointer;
Dans le code Delphi, la fonction Ptr convertit l'adresse donnée en pointeur. Un appel à cette fonction ne génère pas de code, mais traite seulement la valeur de 32 bits donnée par Address comme un pointeur. Tout comme nil, le résultat de Ptr est compatible en terme d'affectation avec tous les types de pointeurs.

---

Ptr ou @ équivaut &
^ c'est le déférencement comme *, la réciproque de @ ou &

Code:

---

md[i]:=byte(Ptr(i)^);

---

en Delphi, je l'aurais plus écrit ainsi :

Code:

---

md[i]:= PByte(@i)^;

---

ou alors tout simplement (cela fonctionne avec le ByteBool en tout cas)

Code:

---

md[i]:= Byte(i);

---

ou sa version mathématique, puisque finalement, il ne conserve que l'octet de poids faible

Code:

---

md[i]:= i and $0000FF

---

md est Byte[] ou int[] ?

Tient lit ce sujet

reinterpret_cast d'un TSmallPoint vers un int

tente

Code:

---

md[i] = *((Byte*)(&i));

---

Byte c'est un unsigned char, 1 octet contre 4 pour i je suppose

Code:

---

md[i] = (Byte&)i;

---

ou encore

Code:

---

md[i]:= i & 0x0000FF

---

ou l'affectation, affecter un int à un unsigned char, cela doit fonctionner, si ça dépasse 255, cela fait quoi, une erreur genre Overflow ou ça tronque ?