Comment éliminer le curseur dans sur un TEdit ?
Comment éliminer le curseur dans sur un TEdit ?
Si tu n'as pas besoin de pouvoir saisir dans l'afficheur, tu peux le mettre disable.
"Il n'y a pas de bonnes réponses à une mauvaise question." (M. Godet)
-----------------------
Pensez à cloturer votre sujet - Aucune réponse aux sollicitations techniques par MP
Usus magister est optimus
Explique un peu mieux.
L'afficheur est il le TEdit de saisie ? Je suppose que oui !
Veux tu afficher le résultat d'un calcul dans le TEdit ? Si oui, tu auras toujours le curseur.
Tu peux utiliser un TLabel ou un TsaticText pour afficher le résultat sans curseur.
A+
Rien n'est moins sur que l'incertain : Pierre DAC
Merci à tous les deux.
Cloture le sujet par un Résolu ...
Juste un petit détail.
qi130 a écrit :
En ce cas, le texte apparaitra grisé.Si tu n'as pas besoin de pouvoir saisir dans l'afficheur, tu peux le mettre disable.
Un autre truc, qui n'empeche pas le SetFocus, mais qui empeche toute saisie.
Ou encore
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 procedure Tform1.Edit1KeyPressed(Sender : TObject); begin Key := #0; end;
Bon courage.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 procedure Tform1.Edit1KeyPressed(Sender : TObject); begin If SaisieInterdite Then Key := #0; end;
J'ai quelques trucs du genre sur mon site WEB. Tu peux aller voir.
Rien n'est moins sur que l'incertain : Pierre DAC
Pardon, juste une petite erreur.
Ou encore :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 procedure TForm1.Edit1Keypressed(Sender : TObject, Var Key : Char); begin Key := #0; end;
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 procedure TForm1.Edit1Keypressed(Sender : TObject, Var Key : Char); begin If SaisieInterdite Then Key := #0; end;
Rien n'est moins sur que l'incertain : Pierre DAC
Une autre solution consisterait à créer un curseur "vide" à l'aide de l'éditeur d'images de l'EDI et de l'affecter à ton TEdit...
Je n'ai pas essayé mais je pense que ça doit marcher
Mais ça doit pas être là le pb parce que je ne vois vraiment pas pourquoi on aurait besoin de faire ça...
Bonne prog
Choisir, c'est renoncer...
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager