Cette fonction permet d'effectuer la copie d'une chaîne de caractères ASCIZ dans une autre.
Function StrCopy(C1,C2:PChar):PChar;