|
Trouver une ressource
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !
Sujet : comparaison de chaines de caratères [ Base de données / SQL Server ] (zoeline)
Informations & options pour cette discussion
jeudi 7 août 2008 à 14:57:32 |
comparaison de chaines de caratères

zoeline
|
Bonjour, je cherche a créer une fonction qui permettrait losque l'on rentre deux chaines de caracteres,de renvoyer le pourcentage de ressemblance entre celles-ci. j'ai trouvé un exemple en delphi mais comme je débute en programmation je ne comprend pas grand chose: - Function ComparerChaines(s1,s2:String):Integer;
- { Fonction comparaison chaînes de texte:
- Entrée:
- S1 = première chaîne a comparer, taille limitée a 2048 caractères
- S2 = deuxième chaîne a comparer, taille limitée a 2048 caractères
- Sortie:
- INTEGER, de 0 a 100, % de ressemblance entre les 2 chaînes }
- Var identiques, // Nombre de caractères identiques
- p1,p2, // Indicateurs de position
- l1,l2, // Longueurs des chaînes
- pt, // Compteur de boucle
- diff : Integer; // Facteur d égalisation
- hstr : String; // Variable temporaire d échange des chaînes
- test : Array [1..2048] Of Boolean; // Tableau d indicateur pour suivre les positions déjà testées
- Begin
- // Tester les longueurs et échanger si S1 est plus courte, on teste toujours par rapport a la chaîne la plus longue
- If Length(s1)<Length(s2) Then Begin
- hstr := s2;
- s2 := s1;
- s1 := hstr;
- End;
- // Stocker les longueurs des chaînes
- l1 := Length(s1);
- l2 := Length(s2);
- // Une chaîne a vide ? alors la comparaison est de 0%
- If (l1=0) Or (l2=0) Then
- Result := 0
- Else Begin
- p1 := 1;
- p2 := 1;
- identiques := 0;
- // Calculer le facteur d égalisation dépendant de la longueur de la chaîne, en général c est 1/3 de la longueur maximale
- diff := Max(l1,l2) Div 3 + Abs(l1-l2);
- // Initialiser le tableau de suivi
- For pt := 1 To l1 Do
- test[pt] := False;
- // Parcours de la chaîne
- Repeat
- // Position testée ?
- If Not test[p1] Then Begin
- // Caractère identique ?
- If (s1[p1]=s2[p2]) And (Abs(p1-p2)<=diff) Then Begin
- test[p1] := True;
- // Augmenter le compteur de caractères identiques
- Inc(identiques);
- // Positions suivantes
- Inc(p1);
- Inc(p2);
- // Boucler
- If p1>l1 Then p1:=1;
- End Else Begin
- Test[p1] := False;
- Inc(p1);
- // Boucler a la prochaine position de test si on arrive a la fin de la chaîne
- If p1>l1 Then Begin
- While (p1>1) And Not (test[p1]) Do
- Dec(p1);
- Inc(p2)
- End;
- End;
- End Else Begin
- Inc(p1);
- // Boucler a la prochaine position de test si on arrive a la fin de la chaîne
- If p1>l1 Then Begin
- Repeat
- Dec(p1);
- Until (p1=1) Or test[p1];
- Inc(p2);
- End;
- End;
- Until p2>Length(s2);
- // Calculer la valeur en pourcentage
- Result := 100 * identiques Div l1;
- End;
- End;
Si vous pouviez m'aider a le transcrire en c#, je vous serait reconnaissante!! :) voila, bonne journée!!
|
|
|
jeudi 7 août 2008 à 17:00:36 |
Re : comparaison de chaines de caratères

ofonadroite
|
Salut, J'avais commencée à te le traduire puis j'ai réfléchie et je me suis dit que ça ne t'aiderai absolument pas. Tu devrai avant tout essayer de créer un algorithme et ensuite demander conseil sur la syntaxe ! Je passe peut être un peu pour une moralisatrice mais il ne faut pas oublier que le forum n'est pas là pour faire le travail à ta place mais pour t'aider pas à pas. N'hésite pas à me demander des conseils. @Pluche
 Si une réponse vous convient n'oubliez pas le réponse acceptée !!! Ca aidera beaucoup d'autres personnes
|
|
|
jeudi 7 août 2008 à 19:53:31 |
Re : comparaison de chaines de caratères
|
Cette discussion est classé dans : end, p1, test, s1, l1
Répondre à ce message
Sujets en rapport avec ce message
création d'un test psychologique ? [ par arwiin ]
Bonjour a tous, je suis actuellemnt d'apprendre le langage Csharp dans le but de créer une version informatisé du "test de barrage" afin d'évaluer l'a
recuperation de donnée [ par Online ]
Bonjour, voila, j'ai réalisé un prog qui se connecte à un FTP via des commandes DOS, mais j'aimerais bien récupérer ls informations renvoyées par le s
Numero Random 16 chiffres [ par metasys ]
Bonjour tlm,Je rechercher une methode pour generer des nombres de 16 chiffres aleatoirement. Je connais Random test = new Random(); test.Next(); et te
cacher les tabpages [ par micfrip ]
Bonjour !Je chercher un moyen de cacher, dans un tabControl, les onglets... Quelqu'un a-t-il une idée du comment faire ?Pour ma part, venant du monde
test si une variable est numérique [ par oboudou ]
En VB6 je pouvais avec IsNumeric() tester une variable et savoir si elle est numérique. Je cherche l'équivalent en C# Dot.NetOlivier Boudou
(textbox) bloquer l'access a certaine touches [ par gnuprotek ]
Bonjour a tous,en VB je fait comme ça pour autorisé la saisie de certain caractere :Private Sub TextBox4_KeyPress(ByVal sender As System.Object, ByVal
Trouver un élément dans une énumération [ par oberown ]
Bon je suis en pleins les énumérations, au cas où si ca se voyait pas ;-)Donc j'ai une string elt, et une enum test;Comment faire pour savoir si mon e
Connect a SQL Server [ par fdouieb ]
Bonjour,J'utilise C# depuis quelques mois. Cependant c'est uniquement la partie Windows Form que avait attiré mon attention dans un premier temps. Mai
FromBase64String, problèmes avec [ par Fildomen ]
salutje chercher une commande xx, qui convertit un string(s1) à un autre string(s2) ,et que celui ci(s2) quand on le reconvertit avec le FromBase64Str
""Purifier" un string [ par Flip84 ]
Bonjour, j'suis débutant en C# et je souhaiterais comme le dit le sujet "purifier" un string.Je m'explique :On a un string, par exemple public string
Livres en rapport
|
Téléchargements
Logiciels à télécharger sur le même thème :
Comparez les prix Nouvelle version
|