RichEdit Focus Ligne [Résolu]

Signaler
Messages postés
18
Date d'inscription
vendredi 5 novembre 2004
Statut
Membre
Dernière intervention
19 mai 2005
-
Messages postés
18
Date d'inscription
vendredi 5 novembre 2004
Statut
Membre
Dernière intervention
19 mai 2005
-
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

1 réponse

Messages postés
18
Date d'inscription
vendredi 5 novembre 2004
Statut
Membre
Dernière intervention
19 mai 2005

Meric beaucoup!!!