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

De Wiki1000
(Page créée avec « <source lang='delphi'>Function TextToEDIText(const aSource:string):string;</source> Cette fonction encode une chaîne en représentation EDI. Pour cela elle ajoutele caract… »)
 
Aucun résumé des modifications
 
Ligne 3 : Ligne 3 :
Cette fonction encode une chaîne en représentation EDI.
Cette fonction encode une chaîne en représentation EDI.


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


{|class="wikitable"
{|class="wikitable"

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

<source lang='delphi'>Function TextToEDIText(const aSource:string):string;</source>

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

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

Result La chaîne encodée.
AText Une chaîne à encoder.

Exemple

<source lang='delphi'> begin

if not (TextToEDIText('aa:aa+aaaa')='aa?:aa?+aa?aa') then ShowMessage('Erreur');

end; </source>

Voir aussi:

{{#if:Développement DSM|

{{#if:Développement DSM|— Développement DSM |}} — Développement DSM

|

{{#if:|— [[{{{1}}}]] |}} — Développement DSM

}}