« EDITextToText (rtl) » : différence entre les versions

De Wiki1000
(Page créée avec « <source lang='delphi'>Function EDITextToText(const aSource:string):string;</source> Cette fonction décode une chaîne en représentation EDI. Pour cela elle retire le carac… »)
 
Aucun résumé des modifications
 
Ligne 2 : Ligne 2 :


Cette fonction décode une chaîne en représentation EDI.
Cette fonction décode une chaîne en représentation EDI.
Pour cela elle retire le caractère d'échappement "?" devant les caractères suivants : "'" ":" "+"
Pour cela elle retire le caractère d'échappement "?" devant les caractères suivants : "'" ":" "+"



Dernière version du 19 août 2010 à 13:18

Function EDITextToText(const aSource:string):string;

Cette fonction décode une chaîne en représentation EDI.

Pour cela elle retire le caractère d'échappement "?" devant les caractères suivants : "'" ":" "+"


Result La chaîne décodée.
aSource Une chaîne à décoder.

Exemple

begin
 if not (EDITextToText(':?dd?:++ ?+')=':?dd:++ +' ) then ShowMessage('Erreur');
end;

Voir aussi:

Développement DSMDéveloppement DSM