RichEdit Focus Ligne

Résolu
rafraf6 Messages postés 18 Date d'inscription vendredi 5 novembre 2004 Statut Membre Dernière intervention 19 mai 2005 - 18 mai 2005 à 14:54
rafraf6 Messages postés 18 Date d'inscription vendredi 5 novembre 2004 Statut Membre Dernière intervention 19 mai 2005 - 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

1 réponse

rafraf6 Messages postés 18 Date d'inscription vendredi 5 novembre 2004 Statut Membre Dernière intervention 19 mai 2005
19 mai 2005 à 13:25
Meric beaucoup!!!
0
Rejoignez-nous