Cette fonction permet de comparer deux chaînes de caractères ASCIZ sans tenir compte des majuscules/minuscules.
Function StrIComp(C1,C2:PChar):Integer;