rafraf6
Messages postés18Date d'inscriptionvendredi 5 novembre 2004StatutMembreDernière intervention19 mai 2005
-
18 mai 2005 à 14:54
rafraf6
Messages postés18Date d'inscriptionvendredi 5 novembre 2004StatutMembreDernière intervention19 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???