Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.10.23;
Скачать: CL | DM;

Вниз

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

 
Sergey_R ©   (2005-10-02 06:41) [0]

Подскажите, как можно отсортировать Stringgrid , допутим, по первому столбцу. В инете нашел, как отсортировать listview, но он мне не подходит. Должна же быть какая-нибудь функция, типа quicksort!
И еще один вопрос. А в Treeview вложенные узлы можно ли как-нибудь отсортировать?


 
злобная танька   (2005-10-02 10:30) [1]

отсортировать можно всё!
в стринггриде есь метод exchange у объекта rows. для сортировки самое оно.


 
злобная танька   (2005-10-02 11:29) [2]

TreeWiew1.SortType := stText
круто да?


 
Sergey_R ©   (2005-10-02 16:43) [3]

2 злобная танька
>TreeWiew1.SortType := stText
А это сработает, если мне нужно отсортировать только вложенный узел в TreeView?


 
alexbou   (2005-10-02 16:46) [4]

А что мешает юзать TTreeView.OnCompare ???

Скажем смотрим - та ветка или нет. Если та - то сортируем так, не та - так сяк...


 
Eleepod   (2005-10-03 00:36) [5]

procedure SortTabl(num: byte);
var i, j: byte;
begin
for i := 1 to StringGrid1.RowCount - 2 do
 for j := i + 1 to StringGrid1.RowCount - 1 do
  if (StringGrid1.Cells[num,i] > StringGrid1.Cells[num,j]) then
    begin
      StringGrid1.Rows[StringGrid1.RowCount] := StringGrid1.Rows[i];
      StringGrid1.Rows[i] := StringGrid1.Rows[j];
      StringGrid1.Rows[j] := StringGrid1.Rows[StringGrid1.RowCount];
    end;
   StringGrid1.Rows[StringGrid1.RowCount].Clear;
end;

Можно так...



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

Текущий архив: 2005.10.23;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.045 c
4-1124377263
Slavik_pr
2005-08-18 19:01
2005.10.23
Как программно задать иконке в трее быть всегда видимой....


3-1126685588
Term
2005-09-14 12:13
2005.10.23
Сообщение об ошибке при создании ХП


14-1128000998
imbalancewc3
2005-09-29 17:36
2005.10.23
Помогите узнать название песни


3-1126268799
alsov
2005-09-09 16:26
2005.10.23
Подскажите функция, которая из значения null делает заданый текст


11-1109578928
NorthMan
2005-02-28 11:22
2005.10.23
[Error] Unit1_1.inc: Identifier redeclared: NewForm1