RichEdit Focus Ligne [Résolu]

rafraf6 18 Messages postés vendredi 5 novembre 2004Date d'inscription 19 mai 2005 Dernière intervention - 18 mai 2005 à 14:54 - Dernière réponse : rafraf6 18 Messages postés vendredi 5 novembre 2004Date d'inscription 19 mai 2005 Dernière intervention
- 19 mai 2005 à 13:25
Bonjour,

J'ai 1 variable i qui va recevoir la ligne sélectionnée avec le curseur de la souris. Et je voudrais mettre cette ligne en surbrillance des que l'on sélectionne( mettre le focus) mais j'y arrive pas.

Cette fonction va retourner la ligne selectionnée :

function RichRow(m:TRichedit) : LongInt;
begin
Result:=SendMessage(m.Handle,EM_LINEFROMCHAR,m.SelStart,0);
end;

Puis dans 1 procedure Onclick:

var i :LongInt;
i := RichRow(RichEdit1);
RicheEdit1.Lines[i] //??? Je voudrais mettre cette ligne en surbrillance???

Merci
Afficher la suite 

Votre réponse

2 réponses

Meilleure réponse
WhiteHippo 1270 Messages postés samedi 14 août 2004Date d'inscription 5 avril 2012 Dernière intervention - 18 mai 2005 à 23:57
3
Merci
http://www.delphifr.com/code.aspx?ID=31464

Cordialement.

Merci WhiteHippo 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 101 internautes ce mois-ci

Commenter la réponse de WhiteHippo
rafraf6 18 Messages postés vendredi 5 novembre 2004Date d'inscription 19 mai 2005 Dernière intervention - 19 mai 2005 à 13:25
0
Merci
Meric beaucoup!!!
Commenter la réponse de rafraf6

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.