La sph?re fonctionne pour moi :) (Delphi2007).

Que dire? A part que c'est un source qui ne s'adresse qu'aux personnes parlant l'Arabe... Personnellement je n'ai même pas les caratères intallés sur mon pindoze et je sais que je n'en aurai pas l'utilité. Quand au source son intérêt est limité par lui même, c'est un code simple et déjà vu plusieurs fois pour le Français.

Quelques idées : pourquoi ne pas faire tout le traitement dans une seule et même fonction au lieu de trois ?

Ah oui ici :
JLA:=days[DayOfWeek(date)] ;
Result:= JLA ;

Pourquoi tu ne fais pas :
Result := days[DayOfWeek(date)] ;

Ca fait une petite variable en moins.
Et renommes tes composants tu t'en sortira mieux ;) .

Sky.