[D7][WIN32] Curseur visible ou invisible

Version imprimable

07/09/2006, 09h55
Herk77

[D7][WIN32] Curseur visible ou invisible

Salut,
je suis en train de faire un traditionnel TEdit pour saisir un nombre, et dans son fonctionnement il a deux états : un état dans lequel il affiche le nombre formatté, par exemple "1 000,00 €", et un autre état qui correspond à la saisie du nombre. Dans le premier état j'aligne le texte à droite en masquant le curseur et dans le deuxième j'aligne à gauche en affichant le curseur. Pour le changement d'alignement je suis aller voir dans la FAQ, et j'ai trouvé la méthode avec SetTextAlign et CreateParams. Mon problème est le suivant, quand j'utilise SetTextAlign le curseur ne réapparait pas toujours, alors que sans SetTextAlign le curseur disparaît et réapparait comme je veux. Un autre problème avec le curseur : quand je minimise ma fenêtre avec le TEdit qui a le curseur caché, quand je restaure ma fenêtre le curseur a réapparu.
Comment faire pour changer l'alignement du texte tout en gérant l'affiche du curseur ? Et, comment faire pour que le curseur réapparaisse seulement quand je le veux ?
Si vous avez pigé et si vous avez des idées, merci d'avance ;)

NB : j'utilise HideCaret et ShowCaret pour masquer et afficher le curseur.
07/09/2006, 11h13
Droïde Système7
Bonjour,

J'ai pas trop pigé même après deux lectures ce que tu désires faire exactement, mais je sais par expérience d'expliquer est un art ;)

Bref, regarde ce p'tit bout de code en souhaitant qui tu puisses l'adapter :
Code:

1 2 3 4 5 procedure TForm1.Button1Click(Sender: TObject); begin Edit1.SetFocus; Edit1.SelStart := length( Edit1.Text) + 1; end;
Cela te donne le focus et déplace ton curseur en fin d'Edit.

@+
07/09/2006, 17h05
Herk77

Bien essayé mais c pas ça :D
En fait ce que je veux c'est :
- quand je saisie un nombre dans mon TFloatEdit, il faut que l'alignement passe en LeftJustify et que le curseur apparaisse.
- quand j'ai fini de taper, il passe en RightJustify et le curseur disparait.
07/09/2006, 17h32
Droïde Système7

Bonjour,

Je ne connais pas ce compo, mais as-tu essayé en OnChange de ton Edit de faire un appel à cette propriété et d'ensuite lui donner le focus ?
07/09/2006, 18h23
Yurck

Citation:

Envoyé par Herk77

- quand je saisie un nombre dans mon TFloatEdit, il faut que l'alignement passe en LeftJustify et que le curseur apparaisse.
- quand j'ai fini de taper, il passe en RightJustify et le curseur disparait.

Moi, mes composants fonctionnent comme cela bon ce sont des TDBEdit mais le TMaskEdit doit fonctionner ainsi.

Tout le problème c'est

Citation:

Envoyé par Herk77

- quand j'ai fini de taper

Comment veux tu déterminer si tu as fini de taper ?
N'est-ce pas là le rôle de la sortie du composant ?
Quand tu entre dans ton composant c'est en théorie pour saisir et quand tu en sort c'est que tu as fini?

Vraiment je ne vois pas ce que tu veux de plus?
a+
07/09/2006, 18h38
Droïde Système7

Bonsoir,

Citation:

Comment veux tu déterminer si tu as fini de taper ?

Et oui ; à part de valider en cliquant sur un bouton ou bien de savoir si le Edit comporte X caractères...

@+ ;)
07/09/2006, 19h46
Herk77

j'ai pas dû être clair sur le fait que je suis en train de créer un composant : le TFloatEdit c'est ma création :oops: :?

en fait je sais que la frappe est fini quand j'appuie sur entrée ou quand je sors du Edit : à ce moment là le texte doit être calé à droite avec le curseur invisible (si on est sorti c'est normal :roll: ) mais si on a appuyé sur entrée on est encore dans le Edit et là je cache le curseur avec HideCaret. Le problème c'est que le curseur ne réapparait pas quand je frappe à nouveau ou quand je rentre à nouveau dans le Edit, et ce même en utilisant ShowCaret.
07/09/2006, 20h12
Droïde Système7

Bonjour,

Oki, oki, je te prennais pour un tout débutant.

Mais connais-tu Google ?

Citation:

j'ai pas dû être clair sur le fait que je suis en train de créer un composant : le TFloatEdit c'est ma création

N'enfonces-tu pas une grande porte ouverte depuis longtemps ?
http://www.programmersheaven.com/dow.../download.aspx ;)

Heuuuu, ou le doublonnage de nom de compos en VCL...
07/09/2006, 21h05
Herk77

Peu importe le TFloatEdit je cherche à savoir pourquoi le curseur ne réapparait pas avec le ShowCaret. Le TFloatEdit c'est un prétexte pour apprendre. ;)
08/09/2006, 00h16
Jipété

Pourquoi il ne réapparaît pas au ShowCaret ?
N'y aurait-il pas un rapport avec ce que me dit mon sdk ? :

Citation:

ShowCaret shows the caret only if the specified window owns the caret, the caret has a shape, and the caret has not been hidden two or more times in a row. If one or more of these conditions is not met, ShowCaret does nothing and returns FALSE.

Hiding is cumulative. If your application calls HideCaret five times in a row, it must also call ShowCaret five times before the caret reappears.

Juste une idée comme ça...
--
jp
08/09/2006, 10h28
Herk77

C'est plutôt en rapport avec le SetTextAlign puisque sans ça marche.
Ou peut être un mélange des deux, mais apparemment personne ne connait le problème. :triste:
08/09/2006, 10h33
Droïde Système7

Bonjour,

Et si tu t'inspirais du code de ton composant, peut-être que la clé est dedans, non ? ;)