Suppression d'une ligne particulière d'un mémo

Bonjour

J'ai un mémo qui est alimenté par un dialogue. Ce dialogue ajoute un élément par élément.
Je désire de pouvoir supprimer une ligne en se positionnant dessus (par un popupmenu).
J'arrive à savoir combien de lignes je posséde mais comment supprimer un élément lorsque que je suis dessus.

Merci de vos pistes

avec ca tu peux eliminer une Ligne ds une TMemo:

Code:

---

1 2	Memo1.Lines.Delete( IndexdeLaLigne );

---

Salut,

En faite, le plus dur est de savoir sur quelle ligne le curseur de la souris se situe.
Tu peux utiliser SelText qui te donne le texte sélectionné. Ensuite tu supprimes.

Voici le code :

Code:

---

1 2 3 4

procedure TForm1.Supprimer1Click(Sender: TObject); begin Memo1.SelText:=''; end;

---

Ceci est un item d'un PopupMenu qui est associé au Memo.
En espérant que c'est ce que tu souhaites ...

;)

et avec ca tu peux savoir la ligne atcuel sur ta Tmemo:

Code:

---

1 2	CuLine:= SendMessage(Memo1.Handle, EM_LINEFROMCHAR, memo1.SelStart, 0);

---