ranger alphabetiquement les lignes d'un Tmemo

Marsh Posté le 26-07-2003 à 22:51:32

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

Marsh Posté le 26-07-2003 à 22:51:32

Marsh Posté le 26-07-2003 à 23:24:17

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

Marsh Posté le 27-07-2003 à 14:49:30

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

Marsh Posté le 27-07-2003 à 15:03:41

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

Marsh Posté le 27-07-2003 à 15:44:53

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 !

Marsh Posté le 27-07-2003 à 15:45:14

euh merci pour la procedure au dessus

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *