Tri d'un richedit en conservant les attributs [Résolu]

Messages postés
41
Date d'inscription
vendredi 30 janvier 2004
Dernière intervention
18 janvier 2014
- - Dernière réponse : alcat2002
Messages postés
41
Date d'inscription
vendredi 30 janvier 2004
Dernière intervention
18 janvier 2014
- 28 juin 2011 à 08:57
salut a tous!
je doit trier un richedit, et je procede de la sorte:

Procedure Trier(List:TStrings);
Var i,j:Integer;
s :String;
Begin
For i:=0 To List.Count-2 Do
For j:=i+1 To List.Count-1 Do
If List[i]>List[j]
Then Begin
s:=List[i];
List[i]:=List[j];
List[j]:=s;
End;
End;

procedure TForm1.Button1Click(Sender: TObject);
begin
Trier(richedit1.Lines);
end;

Les lignes comportent des mots en couleur, comment faire pour conserver les attributs?

Merci!
AlcAt
Afficher la suite 

Votre réponse

2 réponses

Meilleure réponse
Messages postés
4996
Date d'inscription
dimanche 26 février 2006
Dernière intervention
27 mars 2018
15
3
Merci
Bonjour,

piste :
Un TRichEdit n'est pas fait pour trier...
si tu tiens à le conserver effectue ton tri en dehors et
replace les données ensuite.

cantador

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 117 internautes nous ont dit merci ce mois-ci

Commenter la réponse de cs_cantador
Messages postés
41
Date d'inscription
vendredi 30 janvier 2004
Dernière intervention
18 janvier 2014
0
Merci
bon ben j'vais faire comme ca alors..
domage qu'il n'existe pas de composant qui puisse le faire sans se prendre le chou...
Thanks!

AlcAt
Commenter la réponse de alcat2002

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.