Demande de nouvelle fonction sur les chaînes de caractères.

Bonjour.

@Klaus.

J'espère ne pas trop t'ennuyer avec mes demandes de nouvelles fonctions.
Je profite ici pour te remercier encore, car elles m'ont permis de diminuer la vitesse de traitement de certaines parties de mon code de pratiquement 75% !!

J'aurais encore besoin d'une nouvelle fonction de traitement de chaîne, qui simplifierait grandement mon code principal.

Cette fonction devrait permettre de supprimer certains caractères, figurant dans une sous-chaîne,
de la chaîne donnée, puis retourner le résultat dans un memo.

Exemple:

Soit la chaîne '@Bonjour @tout #le #monde.'

Le résultat serait le suivant: 'Bonjour tout le monde.'

Les caractères @ et # se trouvant dans une sous-chaîne, exemple: @#$

Merci de la suite.

Exemple de code à remplacer par un simple appel de dll.

Code:

lire_traduction()
while 0=0
        y%=instr(chaine$,"$")
        if y%=0 then y%=instr(chaine$,"@")
        if y%=0 then y%=instr(chaine$,"#")
        if y%=0 then exit_while
        chaine$=left$(chaine$,y%-1)+right_pos$(chaine$,y%+1)
end_while
mise_a_jour_traduction(chaine$)
traduction$=chaine$

Techniquement facile. J ferai cela pour la prochaine version.

C'est fait. Regarde la nouvelle version de KGF.dll. Une doc succinte y est indiquée, et la doc officielle suivra.

Bonjour.

Merci beaucoup Klaus pour cette nouvelle fonction, qui fonctionne parfaitement.

Pourrais-tu cependant l'améliorer afin que la chaîne initiale soit lue directement dans le memo, et la chaîne finale placée dans un objet memo ?

Car, aujourd'hui, je me retrouve avec 5 lignes de code pour pouvoir utiliser cette fonction, et ce n'est pas le but cherché.
J'aimerais réduire le nombre de lignes à une seule.

Merci de la suite.

Code:

chaine$=trim$(text$(802))
traduction$=string$(len(chaine$)+1," ")
arobace$="$@"
res%=dll_call3("RemoveCharactersFromString",adr(chaine$),adr(traduction$),adr(arobace$))
mise_a_jour_traduction(traduction$)

C'est fait. Recharge la DLL et regarde le programme de démo dans le post sur les nouvelles versions de KGF.dll.

Bonjour.

Un grand merci Klaus, cette nouvelle fonction est géniale.
Elle m'a permis d'accélérer encore un peu plus mon code.

Bonne journée.