création de composant erreur dans function
Bonjour et bonne année à tou(te)s :yaisse2:
Je peaufine un nouveau composant hérité de TMaskEdit
Le but est de faciliter la saisie d'un nombre à décimale (monétaire...)
Lorsque le compo reçoit le focus, le curseur doit se positionner complètement à gauche si la zone de saisie est vide
Il faut donc tester la propriété text
Jusqu'ici, je faisais ce test dans les procédures OnEnter et OnClic, ça marchait mais avec du code redondant
Dans le but d'optimiser, j'ai voulu rajouter une function pour ce test qui renvoie un boolean
Voici les extraits de code
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
| type
TLgDecimale=0..6;
protected
{ Déclarations protégées }
FLgDecimale:TLgDecimale;
function ZoneDeSaisieVide:boolean;
published
{ Déclarations publiées }
property LgDecimale:TLgDecimale read FLgDecimale write FLgDecimale;
end;
implementation
function ZoneDeSaisieVide:boolean;
begin
case LgDecimale of
0: result:=(text=stringofchar(' ',LgEntiere)+SymbolMonnaie);
else result:=(text=stringofchar(' ',LgEntiere)+'.'+stringofchar(' ',LgDecimale)+SymbolMonnaie);
end;
end; |
Plantage à la compilation sur la ligne
[Erreur] MaskFloat.pas(43): Identificateur non déclaré : 'LgDecimale'
Pourquoi ce plantage ?
