1. Accueil
  2. Forum Codes-Sources
  3. Delphi / Pascal
Sujet Précédent Sujet Suivant

Aide sur mini analyseur lexicale [Résolu]

Signaler
Messages postés
2
Date d'inscription
vendredi 5 décembre 2014
Statut
Membre
Dernière intervention
31 décembre 2014
 -
Messages postés
68
Date d'inscription
jeudi 3 novembre 2011
Statut
Membre
Dernière intervention
6 février 2015
 -
Bonjour,
je suis entraine de faire une auto formation delphi7
j entraine de coder un mini analyseur lexicale .
le probleme qui se pose quand je fais l'analyse a partir de matrice de transition
pour voir l'entite est correcte ou non selon ma grammaire : quand j'ai utilsé while j'avais une boucle infini;j'ai utilisé if imbriqué j'avais pas resultat attendue
je suis bloqué
sur internet j trouve d'autre façon de le faire mais comme je suis debutante j'ai rien compris.
aider moi s'il vous plait.
merci d'avance.
voici le code: 

procedure TForm1.Button1Click(Sender: TObject);
 begin
   Etat:='1';
    for l:=1 to length(Mot) do
    begin
     car:=Mot[l];
     if (car<>'#') then
     begin
         Etat:=tab[Etat,car];
       if Etat='/' then
          memo2.Lines.Add('entite incorrecte /');
      end
      else
       if ((Etat<>'5') and (Etat<>'2') and (Etat<>'7') and (Etat<>'8') and (Etat<>'10'))then

         memo2.Lines.Add('entite incorrecte')
         else
        memo2.Lines.Add('entite correcte');


EDIT: Ajout de la coloration syntaxique.

1 réponse

Réponse 1 / 1
Messages postés
68
Date d'inscription
jeudi 3 novembre 2011
Statut
Membre
Dernière intervention
6 février 2015
la Fonction te sera utile. :-) exemple : Pos('#',Mots[I]) 

for l:=1 to length(Mot) do
Pourquoi 1 ? for l:=0

Je suppose que t'ai déclaration de variable son en global ?

Tab ? c'est quoi ?
Répondre Posez votre question