Bonjour mesdames zé messieurs,

    Je suis débutant en Delphi, et j'aimerais réaliser un petit programme (Simple, me disait-on), qui compterait le nombre de mots et de lettres entrés dans un edit à l'aide d'un code comportant une boucle 'for'. 

En plus précis on aurait:
-un edit
-un memo
-un bouton.

Lorsque l'on appuie sur le bouton, j'aimerais que la phrase entrée dans l'edit soit comptée et affichée dans le memo.
 Un petit exemple qui me facilitera l'explication:
      Si la phrase était la suivante "cette phrase là" on verrait ceci dans le memo après avoir appuyé sur le bouton:
###memo1###
Cette : 5 lettres
phrase: 6 lettres
là: 2 lettres
Nombre de mots: 3

Voili voilou... je croise les doigts en espérant que quelqu'un aura la solution à mon problème.

Merci.

Désolé pour ce temps de réponse quelque peu long :) Je cherchais désespérément comment finir ce programme, merci pour ton aide, je crois finalement avoir réussi comme il faut, voici tout-de-même le code:



var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
    Texte: String;
    Mot: String;
    NbMots: Integer;
    NbCar: Integer;
    i: Integer;
begin
   Texte:= edit1.Text;
   Mot:='';
   NbMots:=0;
   NbCar:=0;

         for i:=1 to length(Texte) do
                if Texte[i] = ' ' then
                       begin
                               Memo1.Lines.Add(Mot+inttostr(nbcar));
                               NbCar:=0;  //Reset de la variable contenant le nombre de caractères lorsqu'on rencontre un espace
                               inc(NbMots);
                       end
                else
                       begin
                              inc(NbCar);
                              Mot:=Mot+Texte[i];
                       end;

end;

end.



Ca pourra peut-être servir à quelqu'un ici, qui sait?  Bonne journée, et merci encore !