Problème avec GenerateMaskFragments.

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

Bonjour.

@Klaus.

Cette fonction est vraiment géniale.
Mais ce qui me gêne est le fait que le contenu initial de la liste soit effacé par ladite fonction.
Ne pourrait-on pas inclure un paramètre supplémentaire qui effacerait la liste à la demande ?

Merci de la suite.

Code:: dll_on "kgf"

dim a$, b$,c$,k%,separ$, mask_separ$, mask_text$, mask_quote$, mask_out$, res%, g$
mask_separ$ = "*" : mask_text$ = "=" : mask_quote$= "{}"
separ$ = "#"

list 17
height 17,300

b$=time$
for k%=1 to 1000
   clear 17
   item_add 17,"essai"
   a$ = "4042#4055#4058#4061#4063#"
   mask_out$ = string$(len(a$)," ")
   res% = dll_call6("GenerateMaskFragments",adr(a$),adr(separ$),adr(mask_separ$),adr(mask_text$),adr(mask_quote$),handle(17))
next k%

message b$+" "+time$

Sujet: Re: Problème avec GenerateMaskFragments. Dim 17 Jan 2016 - 19:27

La fonction GenerateMaskFragments a déjà 6 paramètres. Panoramic ne sait pas appeler directement des fonctions avec plus de paramètres.

Je te suggère de sauvegarder le contenu de la LIST dans un DLIST, si tu dois le garder. C'est simple à faire dans une SUB, et donc réutilisable partout.

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

Bonjour.

OK, merci Klaus, je vais donc procéder autrement.

Bonne journée.

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

Bonjour.

@Klaus.

Je reviens sur cette fonction qui me pose problème malgré tout.
Il semble que la longueur de la chaîne à traiter doive être limitée à 255 caractères.
Au-delà de cette valeur, les séparations ne fonctionnent plus.
Il est facile de le vérifier en augmentant la valeur de la boucle finale pour la variable i%.

De plus, à quoi sert la variable mask_out$, car elle n'est pas utilisée dans l'appel de la DLL ?

Merci de ton aide.

Code:: dll_on "kgf"

dim a$, b$, c$, e$, i%, k%, separ$, mask_out$, mask_separ$, mask_text$, mask_quote$, res%
mask_separ$="*" : mask_text$="=" : mask_quote$="{}"
separ$="#"

list 17
height 17,300
width 17,500
font_size 17,12
font_bold 17

b$=time$

clear 17

a$="4042#4055#4058#4061#4063#"
for i%=1 to 11
e$=e$+a$
next i%
caption 0,str$(len(e$))
' mask_out$=string$(len(e$)," ")
res%=dll_call6("GenerateMaskFragments",adr(e$),adr(separ$),adr(mask_separ$),adr(mask_text$),adr(mask_quote$),handle(17))

' c$=time$
' message b$+" "+c$

Sujet: Re: Problème avec GenerateMaskFragments. Lun 18 Jan 2016 - 16:08

Tu as raison: il y avait une limitation (arbitraire) à 255 caractères. J'ai mis une nouvelle version en ligne, portant cette limite à 8095 caractères.

La variable mask_out$ n'a pas de sens, dans ce contexte. C'est un reste d'un copier/coller. Tu peucx la supprimer.

» Problème avec select case Probleme réglé merci
» Problème avec SendStringAsText.
» Problème avec KGF.DLL.
» Problème avec GetWindowsVersion.
» Problème avec kgf.dll.