Problème avec "RemoveStringBetweenDelimiters".

Nombre de messages : 1596 Date d'inscription : 19/01/2014

Bonjour.

@Klaus.

Je rencontre un petit problème avec cette fonction.
Le résultat affiché ne correspond pas à ce que j'attendais.
La fonction n'efface que la première chaîne entre '<' et '>' mais pas la suivante !

Merci de la suite.

Code:: dim ligne$, inf$, sup$, te$, zz%

inf$="<"
sup$=">"

dll_on "kgf"

ligne$="<a href>test<\a>"

te$=string$(len(ligne$)," ")
zz%=dll_call4("RemoveStringBetweenDelimiters",adr(ligne$),adr(inf$),adr(sup$),adr(te$))

message "["+trim$(te$)+"]"

Ok, je vais regarder cela.

Ce comportement est normal, Pedro. Regarde la doc: il est bien indiqué qu'UNE occurrence (la première, donc !) est supprimée, pas toutes !

Par contre, il y a une autre fonction qui fait ce que tu cherches (également dans la doc):

Code:: ' problème pedro_RemoveStringBetweenDelimiters.bas
dim ligne$, inf$, sup$, te$, zz%, te1$, rempl$

inf$="<"
sup$=">"

dll_on "kgf.dll"

ligne$="<a href>test<\a>"

te$=string$(len(ligne$)," ")
te1$=string$(len(ligne$)," ")
rempl$ = ""
zz%=dll_call4("RemoveStringBetweenDelimiters",adr(ligne$),adr(inf$),adr(sup$),adr(te$))
zz% = dll_call5("ReplaceAllStringsBetweenDelimiters",adr(ligne$),adr(inf$),adr(sup$),adr(rempl$),adr(te1$))

message "["+trim$(te$)+"]"+chr$(13)+chr$(10)+"["+trim$(te1$)+"]"

Regarde bien le nom de la fonction - c'est parlant...

Nombre de messages : 1596 Date d'inscription : 19/01/2014

Bonjour.

Merci Klaus, j'avais oublié l'existence de cette fonction.

» Problème avec select case Probleme réglé merci
» problème avec edit ou bien avec combo?
» Problème avec KGF.DLL.
» Problème avec GetWindowsVersion.
» KGF_dll - nouvelles versions