« TextToEDIText (rtl) » : différence entre les versions
(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 | 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 —
}}