如何对memo字段中的内容进行排序。高手请进。在线等候.... (50分)

L

lxc88

Unregistered / Unconfirmed
GUEST, unregistred user!
在ADO+SQL数据表中,有一memo字段。里面存放多个档案编号。每一liner的输入格式如下:
4-5-8-41
6-1-8-7-2
2-5-7-86-3
7-8-2-4-52
....
请问如何在输入这些编号后自动排序。
另外请问哪里有1ST CLASS 控件的中文使用说明。
 
你须要怎么排序。
 
相同的归类。如:
4-2-5-8
4-3-5-9
6-5-82
6-6-8-2
 
在memo1.onkeydown中
(a:TstringList;)
var
i:integer;
begin
if key=vk_return then
begin
for i:=0 to memo1.Lines.Count-1 do
a.Add(memo1.Lines);
a.Sort ;
for i :=0 to memo1.Lines.Count-1 do
memo1.Lines:= a.Strings;
a.Clear ;
end;
 
在memo1.onkeydown事件中,
输入会不会有问题(焦点)。
 
在onexit事件中是不是更好!
 

a.Add(memo1.Lines);
无法编译
 
你有没有 a:=Tstringlist.Create ;
 
对不起,写在哪个位置
 
顶部