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

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

← →
killer ©   (2004-04-28 17:09) [0]

Как осуществить сортировку в StringGrid строк в столбце без первой строки... т.е. заголовка?

---

← →
Андрей Сенченко ©   (2004-04-28 17:12) [1]

Так же как и любую другую сортировку.
http://algolist.manual.ru/sort/index.php

---

← →
killer ©   (2004-04-28 17:15) [2]

сортировка имеется ввиду по алфавиту... :)

---

← →
WebErr ©   (2004-04-28 17:18) [3]

Там же есть Cols, возвращающий TStrings, используйте его, удалив, если надо первую строку Delete(0).

---

← →
Андрей Сенченко ©   (2004-04-28 17:18) [4]

killer ©   (28.04.04 17:15) [2]

Да без разницы, по алфавиту или по значению синуса. Выбираешь наиболее подходящий Тебе алгоритм ( где взять - я показал ) и пишешь ...

---

← →
killer ©   (2004-04-28 17:28) [5]

WebErr а удалить ее прям из таблицы? т.е.
StringGrid1.Cols[1].Delete(0) ?
или присвоить переменной типа TStringList и там удалить?

---

← →
WebErr ©   (2004-04-28 17:29) [6]

> Андрей Сенченко ©   (28.04.04 17:18) [4]

А лучше не маятся дурью и использовать StrComp.

---

← →
WebErr ©   (2004-04-28 17:31) [7]

> killer ©   (28.04.04 17:28) [5]

Сохраните во временном TStrings.
Отсортируйте.
Занесите обратно в таблицу.
ИМХО просто.

---

← →
killer ©   (2004-04-28 17:32) [8]

где удалить то? :(((

---

← →
WebErr ©   (2004-04-28 17:51) [9]

killer, Вы меня убиваете насмерть! :))))

S: TStrings;
...
S := TStringList.Create;
S.Assign(G.Cols[I]);
S.Delete(0); // только если Cols выдаёт ещё и заголовок
... // далее сортируем, используя StrComp - самостоятельно!!!
Потом пробегаем по S[i] и присваиваем соответствующей ячейке нужную строку!

---

← →
Андрей Сенченко ©   (2004-04-28 18:21) [10]

WebErr ©   (28.04.04 17:51) [9]

Ну и кто прав то был когда направлял на Алголист, а кто предлагал дурью маяться ?

Почему мы вдруг перестали работать с переводом TStringGrid.Cols в TStringList когда удалять потребовалось ?

А  следующим вопросом будет - "как добавить". Снова разжевывать будете или все-таки предложите самому найти

---

← →
WebErr ©   (2004-04-28 18:31) [11]

> Андрей Сенченко ©   (28.04.04 18:21) [10]

Ну хорошо, хорошо...
Вы оба меня убиваете насмерть! 8)

---

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

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



Память: 0.47 MB
Время: 0.022 c