rafraf618
Messages postés vendredi 5 novembre 2004Date d'inscription
19 mai 2005
Dernière intervention
-
18 mai 2005 à 14:54 - Dernière réponse : rafraf618
Messages postés vendredi 5 novembre 2004Date d'inscription
19 mai 2005
Dernière intervention
- 19 mai 2005 à 13:25
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???
a aidé 101 internautes ce mois-ci