RetourForum Delphi
Nouveau compte - Se connecter - Perdu votre mot de passe?Recherche: Utilisateur - Message

Index > Forum général > RichEdit Copier SelectionNouveau post - Répondre
Moise
visiteur
Surpris RichEdit Copier Selection message: éditerle 11/08/16 à 07h20


RichEdit Copier Selection

Salut à Tous

Quand je clique sur un mot sélectionné sur mon RichEdit, je veux que ce mot s'écrira dans mon Edit1.

Merci. 

tourlourou
modérateur
2937 messages
Message Re: RichEdit Copier Selection message: éditerle 11/08/16 à 14h09

Il s'agit donc de gérer le clic sur un RichEdit, de telle façon que ce clic conserve la sélection, sans quoi il n'y aura rien à copier !

Je pense que lors du TRichEdit.OnClick il a déjà dû déselectionné le texte : à vérifier. Si SelLength y vaut zéro, CQFD ; sinon, c'est trivial de recopier SelText dans un TEdit.

Si le texte est déjà déselectionné, ça signifie qu'il faut gérer l'événement au KeyDown : y vérifier si SelLength est non nul (sur un clic gauche).

<<débutant, et pour longtemps...>>

Moise
visiteur
Content Re: RichEdit Copier Selection message: éditerle 12/08/16 à 13h00



Meci a toi tourlourou

Ces 2 codes font ce que je voulais

procedure TForm1.RichEdit1DblClick(Sender: TObject);
begin
Edit4.Text:= Richedit1.SelText;
end;

procedure TForm1.RichEdit1SelectionChange(Sender: TObject);
begin
Edit4.Text:= Eichedit1.SelText;
end;

Merci encore bonne continuation @+

Index > Forum général > RichEdit Copier SelectionNouveau post - Répondre
 page 1 sur 1