Discussion :

[Deallyra]

Bonjour les développeurs,

Voilà une petite question toute bête à laquelle je ne trouve pas de réponse dans l'aide...
Ou alors je n'arrive pas à utiliser l'aide comme il le faut ce qui est aussi probable.

Donc mon problème est que j'ai une chaîne de caractère sChaine1 que je souhaiterais comparer avec sChaine2
Si ces deux chaînes ont au moins un caractères commun, j'arrête le test et renvoie faux.

Code WLangage :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
	//Vérification de non concordance entre sChaîne1 et sChaîne2
	bOK est un booléen = Vrai
	i est un entier = 1
	j est un entier
	TANTQUE i <= Occurrence(sChaine1) ET bOK <> Faux
		j = 1
		TANTQUE j <= Occurrence(sChaine2) ET bOK <> Faux
			SI sChaine1[[i]] = sChaine2[[j]] ALORS
				bOK = Faux
			FIN
			j++
		FIN
		i++
	FIN

seulement, Occurence(sChaine) n'existe pas ou du moins, ne fais pas le traitement que je voudrais...
en gros, je voudrais connaître le nombre d'occurence/caractère de la chaîne en question.

[Finar]

Bonjour,

Je te conseille de regarder dans l'aide du coté de TailleCommune()

[Deallyra]

// Comparaison en partant du début
TailleCommune("ABCDE", "ABXYZ") // renvoie 2
// Comparaison en partant de la fin
TailleCommune("VWXYZ", "ABXYZ", DepuisFin) // renvoie 3

// Comparaison caractère par caractère
TailleCommune("New York", "New Yorker") // renvoie 8
// Comparaison par mot entier
TailleCommune("New York", "New York City", MotComplet) // renvoie 3

// Comparaison avec prise en compte de la casse
TailleCommune("ABCDE", "ABCdE") // renvoie 3
// Comparaison sans prise en compte de la casse
TailleCommune("ABCDE", "ABCdE", SansCasse) // renvoie 5

ok Merci mais...

disons que j'ai une chaîne ABCDE et une autre EDCBA
enfin j'ai prit l'inverse de la première chaîne mais ça pourrait être ACBED...

il ne me renverra pas 5. Or c'est le résultat que je voudrais avoir

[Julien67]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
POUR le_i = 1 A TAILLE(sChaine1)
  SI POSITION(sChaine2, MILIEU(sChaine1, le_i, 1)) > 0 ALORS
     RENVOYER faux
  FIN
FIN

[Deallyra]

l'algorithme est meilleur que le mien et semble marcher à vue d'œil ^^
je le teste de suite

[Finar]

Si ces deux chaînes ont au moins un caractères commun, j'arrête le test et renvoie faux.

Donc...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SI TailleCommune(sChaine1, sChaine2) > 0 ALORS RENVOYER Faux

A partir du moment ou tu veux juste renvoyer faux si il y a un caractère en commun, pas besoin de savoir combien il y en a en commun, juste de savoir si il y en a au moins 1.

Après, j'ai peut-être mal compris quelque chose

P.S : Rien dit, je viens de tilter que cette fonction ne marche peut-être pas comme je l'aurais pensé :p

[Jannus]

en gros, je voudrais connaître le nombre d'occurence/caractère de la chaîne en question.

Donc le nombre de caractères communs aux deux chaînes quelque soit leur position.
La code de Julien67 est bon, mais j'y ajouterais un compteur

[Julien67]

La code de Julien67 est bon, mais j'y ajouterais un compteur

MimiCracra44 a dit : "Si ces deux chaînes ont au moins un caractères commun, j'arrête le test et renvoie faux."

[Deallyra]

Je vais être un petit peu plus claire.

A la base, je souhaitais connaître le nombre de caractère dans une chaine pour faire une boucle et ensuite un test avec une autre chaîne.

Le but étant de demander à l'utilisateur de changer sa saisie si dans un caractère dans le champs a est retrouvé dans b et vice versa.

Pour être plus précise encor, j'ai un champs de caractères interdits que l'utilisateur renseigne et un champs de caractères qu'il veut voir apparaître.

Il serait illogique qu'il veuille interdire $ et qu'il le mette également en caractère qu'il souhaite voir apparaître.

d'où cette procédure renvoyant un bOk à faux.

[Julien67]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
POUR le_i = 1 A TAILLE(sChaine1)
  SI POSITION(sChaine2, MILIEU(sChaine1, le_i, 1)) > 0 ALORS
     lch_caract += MILIEU(sChaine1, le_i, 1) + " "
  FIN
FIN
 
INFO("les caracteres" + lch_caract + " sont les 2 champs")
 
RENVOYER FAUX

[Deallyra]

Ça fonctionne très bien Julien ^^
je l'ai adapté à mon contexte et il n'y a aucun problème.
Merci à tous.