Bon week-end à toi aussi
---
Nono40@fr.st
---
Nouveau --->
Nono40.fr.st-------------------------------
Réponse au message :
-------------------------------
> Franchement, MERCI Nono, tu me tire une fois de + une sacrée épine du pied.
> Ca marche du tonnerre :-)
>
> Bon week end a toi :-)
>
> Manu <== CONTENT :-)
>
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> > Dans le OnKeyPressed ajoute le code suivant :
> >
procedure TForm1.SpinEdit1KeyPress(Sender: TObject; var Key: Char);
> > begin
> > If Key In ['-','+',',','.'] Then Key:=#7;
> > end; |
> >
> > Il ne sera alors possible de taper que 0 à 9, les autres touches seront remplacées par un bip. Si tu ne veux pas de bip il faut mettre Key:=#0.
> >
> > ---
Nono40@fr.st
---
> > Nouveau --->
Nono40.fr.st> >
> >
> > -------------------------------
> > Réponse au message :
> > -------------------------------
> >
> > > Bonjour,
> > > J'ai parcouru le forum mais je n'ai pas trouvé d'indice pour mon probleme.
> > > Je vous explique.
> > > J'ai mis un SpinEdit (Edit avec les petits haut et bas pour baisser ou augmenter sa valeur)
> > > et dans le SPinEdit, je ne peux taper en caracteres que:
> > >
> > > "1 2 3 4 5 6 7 8 9 , - +"
> > >
> > > Les signes me derangeaient alors j'avais bien pensé a faire un Abs(mavariable); mais quand je met par exemple
> > > "++-+-585" forcement ca plante.
> > >
> > > Avec le signe virgule, c'est le meme probleme sauf que j'aimerai que quand qqlun tape "45,25" ca supprime la virgule et tout ce qu'il y a apres la virgule...
> > >
> > > Ma variable qui receuille la valeur du spin est déclaré en INTEGER (j'ai essayé avec Cardinal aussi)
> > >
> > > Si vous pouviez eclairer ma lanterne.
> > > Merci
> > >
> > > Manu
> >
>