Discussion :

[colorid]

Bonjour à tous les forumers

Quelqu'un sait-il comment interdire la saisie dans un LabeledEdit qui est déclaré ReadOnly = True ?

Non seulement ce LabeledEdit est capable de prendre le focus mais de surcroît on peut saisir une string dedans !

Comment lui interdire la saisie ?

Merci à tous et bonne journée

[dehorter olivier]

J'ai du mal à comprendre

Si la propriété ReadOnly est mis à True, cela empêche l'édition (et tout changement dans son contenu).

Je viens d'essayer, et je ne peux pas saisir d'informations ... donc pas de problème

[colorid]

La peopriété ReadOnly de ce LabeledEdit est à true et il prend malgré tout le focus puique le curseur de saisie clignote, et on peut sauisir un texte !

[dehorter olivier]

avec ReadOnly, oui on prend avoir le focus, faire du copier, visualiser le Hint, etc mais pas faire de modification.

pour ne rien pourvoir faire, il faut mettre la propriété Enabled à False.

[colorid]

Mais ce n'est pas ergonomique, car l'utilisateur, s'il est capable d'écrire dans un editbox qui est déclaré ReadOnly, comment peut-il savoir que celà ne sert à rien ?

N'y a t-il pas un moyen de l'empécher d'écrire quand l'editbox est en ReadOnly ?

[mick605]

Salut

Normalement, pour un Edit mis en ReadOnly, tu ne peux pas modifier le contenu, de quelque manière que ce soit ! C'est bizarre, parce que j'utilise souvent cette propriété, et je n'ai jamais eu de problèmes avec. As tu essayé sur un nouveau projet vide, pour être sûr ?

Maintenant, il se peut que tu ais un bug, et donc, dans ce cas, tu peux utiliser une solution de contournement, par exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
procedure TForm1.EditKeyPress(Sender : TObject, var Key : Char);
begin
  Key:=#0;
end;

[seabs]

Bonjour,

Si tu ne veux aucune saisie dans le cas où ReadOnly est True, tu peux lier ton composant à un évènement à OnKeyPress.

Le but sera d'éviter toutes les saisies de caractères. Un petit exemple, à modifier, en fonction de tes besoins.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
procedure TForm.LabeledEdit1KeyPress(Sender: TObject; var Key: Char);
begin
  if (Sender as TLabeledEdit).ReadOnly then
    Key := #0;
end;

Il est possible de créer un évènement sur OnEnter pour mettre le focus sur un autre composant dès que TLabeledEdit prend le focus. Exemple :

procedure TForm.LabeledEdit1Enter(Sender: TObject);
begin
AutreComposant.SetFocus;
end;

L'ennui avec Enabled à False, c'est la modification de l'affichage, mais il est possible de contourner cette limitation en incluant TLabeledEdit dans un panel. Avec cette option, tu mets Enabled du Panel à False. Tu conserves l'affichage, mais TLabeledEdit ne peut pas être modifié.

Voici quelques propositions pour résoudre ta difficulté, à toi de choisir

A+

[colorid]

Car la première lettre de la frappe reste affichée

[dehorter olivier]

il y a quand même une bizarrerie


comme Mick605, j'utilise la propriété ReadOnly sans soucis : Je ne peux rien modifier dans le Edit...

J'ai testé avec tLabeledEdit et sa propriété readonly à True, et cela fonctionne comme prévu.....

es tu sur qu'à l’exécution le readonly n'est pas affecté a false ? parce que vraiment le comportement est plus que curieux

[colorid]

La seule différencde est que le TLabeledEDit est dans un GroupBox !

Est-ce que celà peut jouer ? car un GroupBox posséde un TabOrder mais pas de ReadOnly, il est évident que le GroupBox possède le focus pour pouvoir atteindre le TLabeledEDit qui lui appartient, et comme le GroupBox n'a pas de ReadOnly tous ses composants n'héritent-ils pas d'un pseudo ReadOnly à false même si le leur est à True ?

Ce peut être une explication...

[dehorter olivier]

j'ai ce cas de figure aussi, et cela fonctionne très bien

en mode debug, regardes la propriété du readonly, par exemple en regardant au moment d'un KeyPress comme le suggère seabs, tu verras très vite si la propriété à changé

[mick605]

Je suis entièrement d'accord avec Olivier.

Peux tu nous dire la version de Delphi que tu utilises ?

Donne nous aussi les codes des évenements OnKeyDown, OnKeyPress, OnKeyUp, OnChange, si ils existent ...