Вниз
Скачать: CL | DM;

Сортировка строк   Найти похожие ветки 

 
SH ©   (2003-09-22 15:15) [0]

Как отсортировать строки по алфавиту побуквенно?

Сэмпл.
аааа
аааб
ааав
...
абяя
авяя

Ну, как в любом бумажном словаре короче.


 
Skier ©   (2003-09-22 15:18) [1]


> Как отсортировать строки по алфавиту побуквенно?

Использовать операции сравнения строк.


 
SH ©   (2003-09-22 15:24) [2]

Спасибо, я попробую. Похоже это будет весьма хитроумный и запутанный алгоритм. Ещё идеи есть?


 
Stas ©   (2003-09-22 15:24) [3]

Function SortStr (str1,str2:String):Integer;
Var Len,i:Integer;
begin
if length (Str1)>Length(str2) then Len:=Length(Str2)
else len:=length (Str1);
for i:=1 to len do
begin
if ord(str1[i])>ord(Str2[i]) then
begin
Result:=0;
exit;
end;
if ord(str1[i])<ord(Str2[i]) then
begin
Result:=1;
exit;
end;


 
ZEE ©   (2003-09-22 15:25) [4]

TStringList.Sorted:=true; ?


 
SH ©   (2003-09-22 15:32) [5]

Сортировка нужна для ячеек столбцов в StringGrid и для веток TreeView.


 
ZEE ©   (2003-09-22 15:34) [6]

http://www.sources.ru/delphi/db/sort_dbgrid_on_column_click.shtml
http://www.sources.ru/delphi/gui/sorting_tlistview.shtml


 
SH ©   (2003-09-22 15:40) [7]

Попутный вопрос. Как сделать, чтобы сортировка столбца в StringGrid осуществлялась по щелчку на поле fixed. Т.е. это поле надо превратить типа в кнопку. Так, например, можно в Exel выделить столбец, щёлкнув по его названию.


 
Digitman ©   (2003-09-22 15:56) [8]


> Как сделать, чтобы сортировка столбца в StringGrid осуществлялась
> по щелчку на поле fixed


написать обработчик соотв.события, в алгоритме которого StringGrid заполняется вновь сортированными по конкретному критерию ИСХОДНЫМИ данными


 
SH ©   (2003-09-22 16:01) [9]

Дык ж это поле (fixed) некликабельно...


 
pasha_golub ©   (2003-09-22 16:52) [10]

2SH
OnMouseDown



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.014 c
1-18444
vixic
2003-09-24 15:36
2003.10.06
ActiveX


3-18231
jack128
2003-09-16 20:51
2003.10.06
странное поведение IbQuery


14-18620
DProg
2003-09-17 17:10
2003.10.06
QuickReport->Word


3-18245
Julie
2003-09-16 10:32
2003.10.06
SQL


14-18546
DAC
2003-09-19 03:08
2003.10.06
HELP!!!!!!!!!!!!!!!!!!!!!!!




   Наверх