Discussion :

[BXDSPORT]

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

[Soulama]

avec ca tu peux eliminer une Ligne ds une TMemo:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
  Memo1.Lines.Delete( IndexdeLaLigne );

[ero-sennin]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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 ...

[Soulama]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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