Discussion :

[LOGAN75689]

Bonjour à tous,

J'ai un petit soucis à parement très simple mais un peu compliqué avec windev.

Je voudrais tous juste vérifié si certains Lettres sont contenus dans ce Mot, dans le
sens d'une aiguille ou dans le sens contraire.

Voilà mon code :

sMaChaîne est une chaîne = "NEURONE"
SI Contient(sMaChaîne, "N") = VRAI ALORS

1er cas windev reconnait que la Lettre N est dans le mot "NEURONE"


sMaChaîne est une chaîne = "NEURONE"
SI Contient(sMaChaîne, "NE") = VRAI ALORS

2ème cas windev reconnait que les Lettres NE sont sont bien dans le mot "NEURONE"


sMaChaîne est une chaîne = "NEURONE"
SI Contient(sMaChaîne, "EN") = VRAI ALORS

3ème cas windev ne reconnait pas que les Lettres EN sont dans le mot "NEURONE"
alors qu'on voit très bien "E" et "N" N"E"URO"N"

sMaChaîne est une chaîne = "NEURONE"
SI Contient(sMaChaîne, "NR") = VRAI ALORS

4ème cas windev ne reconnait pas que les Lettre NR sont dans le mot "NEURONE"
alors qu'on voit très bien "E" et "N" "N"EU"R"ONE


Et c'est le 3ème et le 4ème cas qui m 'intéresse vivement, je trouve ça un peu étrange.

C'est vrai je peux me tromper.


Je rappelle une fois de plus je suis nouveau dans windev et je suis entrain
d'expérimenté depuis 3 mois.

Merci pour tous ceux qui poseront leur valise un instant par ici, avant de continuer leur voyage.

[Voroltinquo]

Bonjour,
Je cite la doc
Contient

Permet de savoir si une sous-chaîne est contenue dans une chaîne.

Donc Contient(sMaChaîne, "EN") va rechercher la sous-chaîne "EN" et non la lettre "E" puis la lettre "N".

[frenchsting]

C'est vrai je peux me tromper.

Bonjour,

Je te confirme, tout comme voroltinquo, que tu te trompes.

Et j'ajouterai même : RTFM!

[Yusep]

Bonjour.
En francais on lit de gauche a droite.

[serendib]

Bonjour à tous,

J'ai un petit soucis à parement très simple mais un peu compliqué avec windev.

C'est vrai je peux me tromper.

Décidément, ta logique très personnelle, ne fait pas bon ménage avec windev :
https://www.developpez.net/forums/d2...r-txt-externe/

Je suis 100 % d'accord avec mes deux éminents collègues.
(Au moins tu reconnais que tu peux te tromper.)

[serendib]

Et j'ajouterai même : RTFM!

Je dirais même plus...
Bon bah non, ça ferait trop.

[frenchsting]

Je dirais même plus...
Bon bah non, ça ferait trop.

Pas sûr que ça fasse trop...

[tbc92]

J'ai un petit soucis à parement très simple mais un peu compliqué avec windev.

Une nouvelle fois, tu commences ton message par cette phrase.
Dans cette phrase, tu sous-entends que tu sais programmer avec d'autres langages, tu sais résoudre ton problème dans d'autres langages, mais Windev étant un mauvais outil, ce serait compliqué avec Windev.

Donc questions :
- quels autres langages maitrises tu ?
- propose un code qui fonctionne dans ces autres langages.
- fais simplement un copier/coller de ce code dans Windev, qui sait, peut-être que ça va marcher (oui, sérieux, beaucoup de mots clés de C ou JAVA ou autres fonctionnent en Windev)

Critiquer windev sur un forum dédié à Windev... ce n'est vraiment pas comme ça que tu obtiendras de l'aide.

[LOGAN75689]

Bonjour,
Je cite la doc
Contient

Donc Contient(sMaChaîne, "EN") va rechercher la sous-chaîne "EN" et non la lettre "E" puis la lettre "N".

Bonsoir Voroltinquo et merci

Je crois que je me suis fait mal comprendre.

Je vais être plus clair et simple j'ai un mot nommé "NEURONE" j'aimerais vérifier si windev si UR existe dans NEURONE, je voudrais aussi connaitre si RU existe dans le mot "NEURONE"


le 1er cas je suis dans le sens normal des aiguilles d'une montre "UR" qui existe donc c'est vrai puisqu'on retrouve à la 3ème et 4ème position.

Le 2ème cas c'est le sens inverse des aiguilles d'une montre "RU" qui existe donc vrai puisqu'on retrouve à la 4ème et la 3ème position mais windev ne voit pas.

Pour être encore plus précis je prends l'exemple d'un Anagramme si j'ai le mot NEURONE

"NEURONE" à 8 lettres je peux ressortir les sous mots tels que : EURO, ORNE, ROUE ...etc

Maintenant comment savoir que le sous mot EURO existe dans "NEURONE" ainsi de suite.


Je crois que je me suis fait comprendre maintenant



Merci beaucoup

[LOGAN75689]

Une nouvelle fois, tu commences ton message par cette phrase.
Dans cette phrase, tu sous-entends que tu sais programmer avec d'autres langages, tu sais résoudre ton problème dans d'autres langages, mais Windev étant un mauvais outil, ce serait compliqué avec Windev.

Donc questions :
- quels autres langages maitrises tu ?
- propose un code qui fonctionne dans ces autres langages.
- fais simplement un copier/coller de ce code dans Windev, qui sait, peut-être que ça va marcher (oui, sérieux, beaucoup de mots clés de C ou JAVA ou autres fonctionnent en Windev)

Critiquer windev sur un forum dédié à Windev... ce n'est vraiment pas comme ça que tu obtiendras de l'aide.

Bonsoir tbc92 et merci

Je crois que je me suis fait mal comprendre.

Je suis ici pour approfondir plus ou moins mes connaissances dans ce forum windev.

Je ne suis pas ici pour un défi de quoi que se soit et je crois bien que j'ai toujours apprécié windev par sa rapidité. Donc loin de moi le dénigrement de windev comme vous pensez.

Je suis vraiment désolé que vous pensiez que, je dénigre windev, je pense que vous faites allusion dans un autre débat par rapport à la base de donnée HYPER FILES.

Pourquoi, vous refusez que les gens puisent s'exprimer lorsqu'on parle de windev ?

Si vous refusez de m'aider je ne vous en veux pas, c'est de votre droit. Vous êtes libre de le faire ou non.

Mais venir dire que je critique windev, je pense que c'est un peu déplacé le débat.

NB: J'ai beaucoup de respect pour les concepteurs de windev et pour tous les experts du forum windev qui prennent de leur temps pour répondre aux questions posées par les autres et, j'apprécie la facilité de travailler avec windev depuis de cela 3 mois aujourd'hui et je l'ai toujours dit.

Parfois même, je pense que la critique peut être constructive si, on n'a de bonne intention.


Merci

[Voroltinquo]

mais windev ne voit pas.

Tout simplement parce que tu ne lui dis pas comment le voir. Comme je le sous-entendais dans le post #2, il suffit d'épeler.
Comme l'a demandé tbc92, comment écris tu ce code dans les langages que tu connais ?

[Yusep]

Et bien il faut créer une procedure qui inverse tous les caractères de la chaine.
Puis vous appliquez Contient(sMaChaîneInversée, "EN")

[tatayo]

Bonjour,
Pour commencer, il n'y a pas de "sens des aiguilles d'une montre" dans la lecture d'une chaîne.
On peut la lire de gauche à droite, ou de droite à gauche.
Ensuite, les chaînes "RU" et "UR" sont différentes. Donc si tu cherches la chaîne "UR" dans la chaîne "NEURONE', tu la trouves bien en seconde position.
Mais si tu cherches la chaîne "RU" dans "NEURONE", elle ne s'y trouve pas.
C'est ce que tu observes avec la fonction Contient() de Windev.

Maintenant pour bien clarifier la demande: quand tu veux vérifier la présente de "RU" dans "NEURONE", est-ce que tu cherches si "RU" ou "UR" sont bien présentes, ou si les lettres R et U sont présentes ?
Bref si tu cherches "RU" dans "ROUTE", est-ce que la réponse est "Oui" ou "Non" ?
Dans le premier cas il faut juste vérifier la présence de chaque lettre de la première chaîne dans la seconde, et si au moins l'une d'elles est manquante la réponse est FAUX.
Dans le second pas il faut faire 2 passes: chercher la première chaîne dans la seconde, puis inverser ka première chaîne et faire la même recherche. Le résultat sera vrai si au moins l'une des deux recherche réussit.

Tatayo.

[serendib]

Bonjour,

On touche ici clairement le comportement assisté des nouveaux programmeurs windev.
Est-ce que windev a prévu une instruction qui fait en une ligne de code ce que je veux obtenir ?
Non ? alors avec windev c'est compliqué.

Prenons la fonction Age()
Elle n'existe pas avant windev 10.
Mais est-ce si compliqué quand on se dit programmeur, de se créer cette fonction ?
(et des fonctions de ce genre il en sort chaque année)
Par contre ça permet à PcSoft d'annoncer les centaines de pseudos nouveautés chaque année.
Et de faire grossir démesurément la framework.

[tbc92]

Le besoin n'est toujours pas clair.

Je pars du mot CHAT.
est-ce que les lettres (C,A,H) sont présentes dans CHAT ?
Si je lis CHAT de gauche à droite, non.
Et De droite à gauche, non plus.
Réponse : probablement non.
Mais peut-être oui.

Nous, avec plein de bonne volonté, on ne comprend pas ton besoin.
Et tu voudrais que ton PC, via Windev, devine ce que tu veux ?

[Jon Shannow]

De ce que j'ai compris des dires de LOGAN75689, la solution est celle donnée par Tatayo dans sont second cas

Dans le second pas il faut faire 2 passes: chercher la première chaîne dans la seconde, puis inverser ka première chaîne et faire la même recherche. Le résultat sera vrai si au moins l'une des deux recherche réussit.

JS

[tbc92]

Dans ses exemples, ORNE ou ROUE sont inclus dans NEURONE, donc apparemment la recherche doit s'autoriser des aller-retours.

Est-ce que NONO est inclus dans NEURONE ?

[Voroltinquo]

Comme je l'écrivais dans mes post #2 et #11 il suffit d'épeler (i.e. de parcourir l'ensemble des lettres cherchées)
Voici 2 syntaxes de la surcharge de Contient

Code :

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

1
2
3
4
5
6
7
 
COOption est une Combinaison
	oSansCasse
	oMotComplet
	oOrdonné		//La recherche est faite dans l'ordre, sinon, l'ordre importe peu
	oDroiteGauche	//La recherche se fait de droite à gauche
FIN

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
 
// Résumé : Recherche l’existence d'une série de lettres, ordonnée ou non, dans une chaîne
// Description des paramètres d'entrée/sortie de 'Contient' :
//
// Syntaxe :
//[ <Résultat> = ] Contient (<saSource> est chaîne, <tabLettres> est tableau [, <coOptionRecherche> est COOption])
//
// Paramètres :
//	saSource (chaîne ANSI) : Chaîne dans laquelle la recherche doit se faire
//	tabLettres (tableau) : Série de lettre à rechercher
//	coOptionRecherche (FEN_Test.COOption - valeur par défaut=0) : 
//		oSansCasse 		: Recherche sans tenir compte de la casse (différences majuscules / minuscules) ou des accents
//		oMotComplet 	: Recherche un mot complet (entouré par des caractères de ponctuation ou des espaces).
//		oOrdonnée		: La recherche se fait dans l'ordre de la série ["A","B"] renverra vrai si A et B sont trouvées
//						 dans cet ordre
//		oDroiteGauche	: Combinée avec oOrdonnée, la recherche se fait de droite à gauche
//		Ces options sont combinables.
// Valeur de retour :
// 	booléen : Vrai si les lettres existent, Faux sinon.
//
// Exemple :
// SI Contient("CHAT",["a","C"],oSanCasse+oOrdonnée) ALORS
//	Trace("OK")
// SINON
//	Trace("NOK")
//		
FONCTION Contient(LOCAL saSource	est chaîne,LOCAL tabLettres est tableau de chaîne sur 1,...
					LOCAL coOptionRecherche est COOption=0):booléen
saVérif			est chaîne sur 1
nPositionLettre	est entier
nOptionContient est entier
 
nOptionContient=TraiterOption(coOptionRecherche,saSource)
 
POUR TOUT saVérif DE tabLettres
	SI WL.Contient(saSource,saVérif,nOptionContient) ALORS
		SI coOptionRecherche[oOrdonné] ALORS
			nPositionLettre	= Position(saSource,saVérif,1,nOptionContient)
			//On continue la recherche avec les lettres qui suivent la lettre trouvée
			saSource		= saSource[[nPositionLettre+1 À]]	
		FIN
	SINON
		RENVOYER Faux
	FIN
FIN
RENVOYER Vrai

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
 
// Résumé : Recherche l’existence d'une série de lettres, ordonnée ou non, dans une chaîne
// Description des paramètres d'entrée/sortie de 'Contient' :
//
// Syntaxe :
//[ <Résultat> = ] Contient (<saSource> est chaîne, <tabLettres> est tableau [, <coOptionRecherche> est COOption])
//
// Paramètres :
//	saSource (chaîne ANSI) : Chaîne dans laquelle la recherche doit se faire
//	tabLettres (tableau) : Série de lettre à rechercher
//	coOptionRecherche (FEN_Test.COOption - valeur par défaut=0) : 
//		oSansCasse 		: Recherche sans tenir compte de la casse (différences majuscules / minuscules) ou des accents
//		oMotComplet 	: Recherche un mot complet (entouré par des caractères de ponctuation ou des espaces).
//		oOrdonnée		: La recherche se fait dans l'ordre de la série ["A","B"] renverra vrai si A et B sont trouvées
//						 dans cet ordre
//		oDroiteGauche	: Combinée avec oOrdonnée, la recherche se fait de droite à gauche
//		Ces options sont combinables.
// Valeur de retour :
// 	booléen : Vrai si les lettres existent, Faux sinon.
//
// Exemple :
// SI Contient("CHAT","aC",oSanCasse+oOrdonnée) ALORS
//	Trace("OK")
// SINON
//	Trace("NOK")
 
FONCTION Contient(LOCAL saSource est chaîne, LOCAL saVérif est une chaîne,...
					LOCAL coOptionRecherche est COOption=0):booléen
nIndVérif			est entier
nPositionLettre	est entier
nOption est entier
 
nOption=TraiterOption(coOptionRecherche,saSource)
 
POUR nIndVérif =1 _À_ Taille(saVérif)
	SI WL.Contient(saSource,saVérif[nIndVérif],nOption) ALORS
		SI coOptionRecherche[oOrdonné] ALORS
			nPositionLettre	= Position(saSource,saVérif,1,nOption)
			//On continue la recherche avec les lettres qui suivent la lettre trouvée
			saSource		= saSource[[nPositionLettre+1 À]]
		FIN
	SINON
		RENVOYER Faux
	FIN
FIN
RENVOYER Vrai

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
 
// Résumé : Convertit les options de la fonction surchargée en options utilisables par la fonction de base.
//			Inverse éventuellement la chaîne source
// Description des paramètres d'entrée/sortie de 'TraiterOption' :
//
// Syntaxe :
//[ <Résultat> = ] TraiterOption (<coOptionRecherche> est COOption, <saSource> est chaîne)
//
// Paramètres :
//	coOptionRecherche (COOption) : Options de la fonction surchargée
//	saSource (chaîne ANSI) : Chaine dans laquelle doit se faire la recherche
// Valeur de retour :
// 	entier : Option utilisable par la fonction de base
//
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
// Entrée :
FONCTION TraiterOption(LOCAL coOptionRecherche est COOption,saSource est chaîne) : entier
nOption est un entier
 
SI coOptionRecherche[oSansCasse] ALORS
	nOption=SansCasse
FIN
SI coOptionRecherche[oMotComplet] ALORS
	nOption+=MotComplet
FIN
SI coOptionRecherche[oDroiteGauche] ALORS
	saSource=InverseChaine(saSource)
FIN
 
RENVOYER nOption

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
// Résumé : Inverse l'ordre d'une chaîne donnée
// Description des paramètres d'entrée/sortie de 'InverseChaine' :
//
// Syntaxe :
//[ <Résultat> = ] InverseChaine (<saSource> est chaîne)
//
// Paramètres :
//	saSource (chaîne ANSI) : Chaîne à inverser
// Valeur de retour :
// 	chaîne ANSI : Chaîne inversée
//
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
FONCTION InverseChaine(LOCAL saSource est chaîne) : chaîne
saInverse est chaîne
nPosition est entier
 
POUR nPosition = 1 _À_ Taille(saSource)
	saInverse+=saSource[Taille(saSource)-nPosition+1]
FIN
 
RENVOYER saInverse

[serendib]

En gros il est soit paresseux, soit inapte à la programmation.

Comme Windev n'a pas la fonction Logan("EN"), il espère la fonction Voroltinquo("EN).
Et ça marche.

[LOGAN75689]

Bonjour et merci à tous, ceux qui ont été en mesure de me faire part de leurs préoccupations.

Mais j'ai un problème et je trouve ça insultant et indigne de quelqu'un qui veut se faire donneur de Leçons.

Je parle ici particulièrement de serendib qui m'a traité de PARESSEUX.

Qu'est-ce que le respect, mais qui est irrespectueux à l'égard d'autrui ?

Je crois bien que ce Forum a une certaine règle d'éthique et de déontologie et c'est pourquoi je pense qu'il exige l'acceptation d'une charte avant toute participation.


Vous vouliez peut-être que j'en parle et je serai bref, j'ai un projet à mettre au point à partir de NEURONES.

Depuis pratiquement plus 3 mois et quelques jours j’évolue avec windev.

On ne peut pas qualifier quelqu'un de "PARESSEUX" sans le connaître.

J'ai plus de 650 algorithmes que je teste en utilisant windev.

Pour l'instant grâce aux fonctionnalités j'ai été en mesure de débloquer 25%, et pour les autres solutions de
contournements proviennent de moi-même soit à 33%.

Et quand je serais à 100% je lancerai mon projet comme il se doit.

Je remarque que windev ne gère pas les choses complexes, il faut toujours utiliser une solution de contournement.

Je suis très surpris que vous ne connaissiez pas les nuits blanches que je passe à réfléchir pour les contournements et vous avez le culot et l'audace de venir me traiter de [B]PARESSEUX[/B].

NB : S'il valait que j’expose tous mes problèmes concernant windev, je pense que ce serait au-moins à 10 questions par jour, mais, je ne le fait pas, je cherche toujours une solution de contournement émanant de moi même.

Et même le problème que, j'ai posé sur le Forum selon vous c'était impossible, mais au bout du compte vous avez vu que c’était possible, imaginez-vous que vous devriez affronter alors plus de 638 problèmes de ce genre et que vous êtes obligé d'utiliser uniquement les solutions de contournements. Puisque vous ne pourriez rien faire sans utiliser les méthodes de contournements.

NB: Le problème posé dans le FORUM ne représente même pas les 0,002% en matière des avancés de moi-même face à mes propres recherches de contournement.

La preuve en 3 mois quelques jours j'ai pu poser seulement 2 questions sur les 638 problèmes donc je passe
des nuits blanches tous les jours, et parfois les journées lorsque j'ai un peu de temps libre.

Et si vous aviez été vraiment très curieux, vous auriez su que c'est des problèmes vraiment très complexes,
et si vous ne prêtez pas attention de manière objectif, et bien vous diriez tout simple que c'est impossible.


Parfois il est préférable de garder le silence que de porter un jugement sur une personne et d'avoir la prétention
de détenir la science infuse sans pourtant trouvé une solution au problème posé.


J'apprécie honnêtement ceux qui contribue. D'une manière générale les autres m'ont donné des pistes et m'ont fait progresser.

Et en plus vous avez même encore relié un autre lien qui n'a rien à voir avec mon souci actuel.

Vous êtes peut-être grand en âge et peut-être entre guillemets «Expert en Windev», mais vous manquez encore
de connaissances pour vivre en communauté, de la personnalité, et la maturité.


Vous n’êtes pas digne de quelqu'un capable de donner le bon exemple.

Je pense que vous êtes la pire personnes que l'homme pourrait encore poser des questions.
Je me pose encore bien des questions sur votre Expertise avérée dans windev.

Je trouve votre manière d’insulté une personne donc vous ne connaissez ni d'Adan, ni d'Eve de bassesse de
bas étage, et d'un plancher inférieur ressemblant davantage aux propos bolcheviques, d'immoral, et n'est pas digne d'une personne au 21ème siècle actuel.

Je pense que parfois il vaut mieux ne rien dire au-lieu d'avancer des âneries, et des balivernes, des choses de bases étages qui ne construisent, n'édifier en rien, bref n'apporte aucune valeur ajoutée à l'édifice.


APPRENEZ A VOUS RESPECTER POUR QUE L'ON S'OCCUPE DE VOUS D'UNE FAÇON MUTUELLE PLUTÔT QU'ANIMALE.


Je crois que le message est maintenant passé.