c'est mon code de A à Z, c'est pour ça que c'est en Delphi 7, et que sous XE3, ça planterais à cause de l'unicode (sur les ansistring).