begin process at 2010 02 09 23:42:48
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > 

Code

 > 

Texte

 > DONNE NOMBRE DE TOKEN DANS UNE CHAINE

DONNE NOMBRE DE TOKEN DANS UNE CHAINE


 Information sur la source

Note :
2 / 10 - par 1 personne
2,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Texte Niveau :Débutant Date de création :03/03/2003 Date de mise à jour :03/03/2003 11:55:00 Vu :2 055
Auteur : Amadeus

Ecrire un message privé
Commentaire sur cette source (1)
Ajouter un commentaire et/ou une note

 Description

Peut s'utiliser avec TokenAt
Retourne le nombre de token contenu dans la chaîne S.

Source

  • function TokenCount(S: string; Seperator: Char): Integer;
  • var
  • I: Integer;
  • begin
  • Result := 0;
  • I := 1;
  • while (I <= Length(S)) do
  • begin
  • if (S[I] = Seperator) then
  • Inc(Result);
  • Inc(I);
  • end;
  • Inc(Result);
  • end;
function TokenCount(S: string; Seperator: Char): Integer;

var
  I: Integer;

begin
  Result := 0;
  I := 1;

  while (I <= Length(S)) do
  begin
    if (S[I] = Seperator) then
      Inc(Result);

    Inc(I);
  end;

  Inc(Result);
end;



 Sources du même auteur

VERROUILER UN FICHIER
RENVOIE UNE PARTIE D'UNE CHAINE PAR RAPPORT À UN SÉPARATEUR
Source avec Zip COMPOSANT TALIGNPANEL
GESTION DES FENÊTRE MDI FILLE UNIQUE
Source avec Zip EXPORT DE DONNÉE D'UN DATASET DANS UN FICHIER TEXTE
Toutes les sources de Amadeus

 Sources de la même categorie

Source avec Zip COMBINAISONS DE STRINGS par askil2000
Source avec Zip Source avec une capture RECONNAISSANCE DE CARACTÈRES (OCR) par Bacterius
Source avec Zip Source avec une capture NETTOYAGE AUTOMATIQUE DE NOMS DE FICHIERS par John Dogget
DISTANCE DE JARO-WINKLER par PoulpHunter
Source avec Zip BASE DE DONNÉE WIKI par thithony
Toutes les sources de la catégorie Texte

Commentaires et avis

Commentaire de amiga68 le 05/03/2007 14:21:12

Euh... C'est juste une fonction qui compte le nombre de mots dans une phrase ?

 Ajouter un commentaire

Nos sponsors


Sondage...

Comparez les prix


Samsung Galaxy I7500 (8 Go)
Entre 129€ et 575€

Visiter le guide achat

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,499 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)