ANALYSEUR DE SYNTAXE MATHÉMATIQUE

Signaler
Messages postés
205
Date d'inscription
samedi 10 mai 2003
Statut
Membre
Dernière intervention
2 juin 2005
-
Messages postés
1106
Date d'inscription
samedi 8 novembre 2003
Statut
Membre
Dernière intervention
3 septembre 2006
-
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/20662-analyseur-de-syntaxe-mathematique

Messages postés
1106
Date d'inscription
samedi 8 novembre 2003
Statut
Membre
Dernière intervention
3 septembre 2006
21
Les commentaires précédents ont été inclus.
Messages postés
1106
Date d'inscription
samedi 8 novembre 2003
Statut
Membre
Dernière intervention
3 septembre 2006
21
Oups... c'est vrai. ABCLetter et Number sont dans taplus. De toute façon, respectivement, ça dit si c'est des lettres et si c'est un chiffre:

function ABCLetter(c:char):boolean;
begin
ABCLetter:= Pos(LowerCase(c),'abcdefghijklmnopqrstuvwyxz')<>0;
end;

function Number(c:char):boolean;
begin
Number:= Pos(LowerCase(c),'0123456789')<>0;
end;

Il me semble que c'est ça.
Messages postés
212
Date d'inscription
samedi 15 novembre 2003
Statut
Membre
Dernière intervention
19 août 2021
10
bonjour
je remplace le message d'erreur OK
mais je ne trouve pas les fonctions
AbcLetter() and Number()
si je les supprime la compil se fait
mais résultat ??
a+
Messages postés
1106
Date d'inscription
samedi 8 novembre 2003
Statut
Membre
Dernière intervention
3 septembre 2006
21
TAPLUS n'est pas fondammental: ErrorBox est dans taplus.pas et est un MessageDlg simplifié (une sorte de ShowMessage avec le panneau erreur).

Un paquet des paquets est probablement manquant. Supprimez le .DOF (voire le .res aussi) et tout ira bien... du moins, je l'espère.
Afficher les 6 commentaires