-------------</center><br>
<font color="silver">
<pre >
<font color="Teal">
Program crackpatch;  </font>             <i>// Pas touche</i>
<font color="Teal">Uses Crt;</font>                         <i>// Pas touche</i>


<font color="Teal">Const A: Array[1..<font color="Red">5</font>] of Record  </font><i>// 5 correspond au nombre de
                                // byte que vouz changez       
                                // Ca pourrait etre 1 ou 60 selon le cas ! </i>


<font color="Teal">A : Longint