ranger alphabetiquement les lignes d'un Tmemo

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : ranger alphabetiquement les lignes d'un Tmemo

piloud

Voila , je voit pas trop comment m'y prendre ,un peu d'aide serait la bienvenue .

ou si vous avez une unit ou un script qui fait ca , ca serait cool de me le passait !

merci

Publicité

Kyle_Katarn

Tu dois probablement passer ton Memo dans une StringList puis faire un sort dessus

piloud

j'ai aucune envie de mettre des string list .....
i doit bien yavoir un moyen , si on peut le faire pour une string list , pourkoi pas pour les ligne d'un tmemo (vu que lon peut recuperer la valeur de chaque ligne )

si ca peut aider , ceux que je veux ordonner c une liste de chiffre dans un tmemo ....

merci d'avance

antp

Super Administrateur
Champion des excuses bidons

var
lst: TStringList
begin
lst := TStringList.Create;
try
lst.AddStrings(Memo1.Lines);
Sorted := True;
Memo1.Lines.Clear;
Memo1.Lines.AddStrings(lst);
finally
lst.Free;
end;
end;

Si tu veux vraiment pas déclarer de variable temporaire :

with TStringList.Create
try
AddStrings(Memo1.Lines);
Sorted := True;
Memo1.Lines.Text := Text;
finally
Free;
end;

Un memo contient un TMemoStrings, qui descend de TStrings.
Le tri est implémenté dans TStringList, qui descend aussi de TStrings.

Tes nombres, ils ont un zéro devant pour qu'on puisse les trier comme des chaînes ? Si ce n'est pas le cas, il n'y a rien du tout d'automatique, va falloir le faire "à la main" en convertissant les chaînes en Integer.

Message édité par antp le 27-07-2003 à 15:05:56

---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire

piloud

merde javais pas pense a ca ....

100 est devant 8 car il commence par un 1
bon faut que je trouve une maniere de mettre un 008 , et ca marchera je pense !

piloud

euh merci pour la procedure au dessus

FORUM HardWare.fr

Programmation

Delphi/Pascal

ranger alphabetiquement les lignes d'un Tmemo

Sujets relatifs
[PHP] Ranger un tableau dans l'ordre alphabétique	bouton SUBMIT : texte sur 2 lignes !
Que veulent dire ces lignes ?	[batch dos] Supprimé les 3 premieres lignes d un fichier txt
longueur des lignes html	Comment compter le nombre de lignes d'un ficher ??
[Shell] Compter le nb. de lignes d'un fichier ??	Détecter des lignes sur une image
une erreur bete perdu dans 5 lignes de code	[mysql] réorganiser des lignes
Plus de sujets relatifs à : ranger alphabetiquement les lignes d'un Tmemo

Page générée en 0.041 secondes