SpinEdit Format ? [Résolu]

Delphiturbo 69 Messages postés mercredi 31 octobre 2007Date d'inscription 29 juillet 2008 Dernière intervention - 29 mai 2008 à 15:01 - Dernière réponse : Delphiturbo 69 Messages postés mercredi 31 octobre 2007Date d'inscription 29 juillet 2008 Dernière intervention
- 29 mai 2008 à 16:47
Salut,
UpDown n'accepte pas le Value que je done avec keyborad
Il demare toujour de 0 !!!
Comment eviter cet Probleme ?

procedure TForm1.UpDown1Click(Sender: TObject; Button: TUDBtnType);
begin
Edit1.text := Format('%.5d', [UpDown1.Position]); // ok
end;

Et si j'etulise SpinEdit, c est bien mais il ya des Problem
1. les Fleches restont petite !
2. Format : si je donne 00001 et je clique sur UpDown, il sera 2 et pas 00002 !
et si je donne cette Format:
procedure TForm1.SpinEdit1Change(Sender: TObject);
begin
SpinEdit1.Text := Format('%.5d', [UpDown1.Position]);// no !
end;
le code ne marche pas !

merc
Afficher la suite 

Votre réponse

2 réponses

Meilleure réponse
Cirec 4231 Messages postés vendredi 23 juillet 2004Date d'inscription 3 août 2018 Dernière intervention - 29 mai 2008 à 16:17
3
Merci
Salut,

dans le OnCreate la fiche (ou ailleurs)
procedure TForm1.FormCreate(Sender: TObject);
begin
  UpDown1.Position := 111;
  UpDown1.OnClick(Self, btNext);
end;

 
@+
Cirec

<hr siz="" />

Merci Cirec 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 99 internautes ce mois-ci

Commenter la réponse de Cirec
Delphiturbo 69 Messages postés mercredi 31 octobre 2007Date d'inscription 29 juillet 2008 Dernière intervention - 29 mai 2008 à 16:47
0
Merci
merci. Sa marche
Commenter la réponse de Delphiturbo

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.