Сортировка в DBGrid

@Dam · Регистрация: 25.01.2008

Студворк — интернет-сервис помощи студентам

Здравствуйте. Возникла проблема: ОЧЕНЬ нужно чтобы при нажатии на кнопку,
в компоненте DBGrid происходила сортировка содержимого по алфавиту.
Пожалуйста напишите как (если можно с примером кода).:huh:

@Lord_Voodoo · 16.02.2010, 16:30

Landser,ну так ты выбранному ставь цвет крассный, а остальным - черный цвет в цикле

@Landser · 16.02.2010, 20:45

..выбранному ставь цвет крассный, а остальным - черный цвет в цикле

циклу по колонкам что ли?

Delphi
1
2
3
4
 for i:=0 to dbgrid3.Columns.Count-1 do
 begin
   DbGrid3.Columns[i].title.font.color:=clred;
  end;

так я выбранному назначаю цвет, а как так изменить код, чтобы остальные красились в clgreen например?

@Lord_Voodoo · 16.02.2010, 20:48

Landser, да уж...

Delphi
1
2
3
4
5
6
7
 for i:=0 to dbgrid3.Columns.Count-1 do
 begin
   if i = DbGrid3.SelectedIndex then 
     DbGrid3.Columns[i].title.font.color:=clred
   else 
     DbGrid3.Columns[i].title.font.color:=clgreen;
  end;

@Landser · 16.02.2010, 21:04

Landser, да уж...

да уж)))ума не приложу, как сам не догадался, просто самому смешно

спасибо, Lord_Voodoo!

@proggamer12 · 12.11.2013, 17:48

Здравствуйте.
Вы написали, что для TADOTable можно использовать это:

Delphi
1
adotable.sort:=column.fiedname;

И при таком варианте при кликах по разным полям по ним будет идти сортировка.
Но что делать с TADOQuery?
Заранее благодарен,
proggamer12.

@proggamer12 · 17.11.2013, 21:08

Решил вопрос:
Если первый клик по колонке (вообще), то добавляем новую строку, если не первый - то удаляем последнюю строку и добавляем новую.

@on-lite · 17.12.2018, 11:21

в TTable нужно прописать индексы и можно выполнить сортировку прописывая лишь одну строку.
Title -> TitleBatton сделать true.
в событии .DBGridEh1TitleBtnClick

Delphi
1
Table1.IndexFieldNames:=Column.FieldName;

и сортирует по колонкам с индексами, где не прописаны индексы, там не сортирует и ошибок не выдаёт.
прошлый век, но может кому нужно, студентам например.

@proggamer12 · 17.12.2018, 12:03

Спасибо за ответ!

Новые блоги и статьи Все статьи Все блоги /
Хитросплетение родственных связей пантеона греческих богов. russiannick 14.05.2026 Однооконник, позволяющий узреть и изучить отдельных героев древней Греции. <!DOCTYPE html> <html lang="ru"> <head> <meta charset="UTF-8"> <meta http-equiv="X-UA-Compatible". . .	[golang] Угол между стрелками часов alhaos 12.05.2026 По заданным значениям часа и минуты необходимо определить значение меньшего угла между стрелками аналогового циферблата часов. import "math" func angleClock(hour int, minutes int) float64 { . . .	Debian 13: Установка Lazarus QT5 ВитГо 09.05.2026 Эта инструкция моя компиляция инструкций volvo https:/ / www. cyberforum. ru/ blogs/ 203668/ 10753. html и его же старой инструкции по установке Lazarus с gtk2. . .	Нейросеть на алгоритме "эстафета хвоста" как перспектива. Hrethgir 06.05.2026 На десерт, когда запущу сервер. Статья тут https:/ / habr. com/ ru/ articles/ 1030914/ . Автор я сам, нейросеть только помогает в вопросах которые мне не известны - не знаю людей которые знали-бы. . .
Асинхронный приём данных из COM-порта Argus19 01.05.2026 Асинхронный приём данных из COM-порта Купил на aliexpress термопринтер QR701. Он оказался странным. Поключил к Arduino Nano. Был очень удивлён. Наотрез отказывается печатать русские буквы. Чтобы. . .	попытка написать игровой сервер на C++ pyirrlicht 29.04.2026 попытка написать игровой сервер на плюсах с открытым бесконечным миром. возможно получится прикрутить интерпретатор питон для кастомизации игровой логики. что есть на текущий момент:. . .	Контроль уникальности выбранного документа-основания при изменении реквизита Maks 28.04.2026 Алгоритм из решения ниже разработан на примере нетипового документа "ЗаявкаНаРемонтСпецтехники", разработанного в КА2. Задача: уведомлять пользователя, если указанная заявка (документ-основание). . .	Благородство как наказание Maks 24.04.2026 У хорошего человека отношения с женщинами всегда складываются трудно. А я человек хороший. Заявляю без тени смущения, потому что гордиться тут нечем. От хорошего человека ждут соответствующего. . .

@Dam 6 / 6 / 1 Регистрация: 25.01.2008 Сообщений: 13

	Сортировка в DBGrid 16.06.2008, 19:15. Показов 94262. Ответов 47 Метки нет (Все метки) Здравствуйте. Возникла проблема: ОЧЕНЬ нужно чтобы при нажатии на кнопку, в компоненте DBGrid происходила сортировка содержимого по алфавиту. Пожалуйста напишите как (если можно с примером кода).:huh: 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	16.02.2010, 16:30
	Landser,ну так ты выбранному ставь цвет крассный, а остальным - черный цвет в цикле 1

@proggamer12 17 / 17 / 4 Регистрация: 06.07.2012 Сообщений: 510
	17.11.2013, 21:08
	Решил вопрос: Если первый клик по колонке (вообще), то добавляем новую строку, если не первый - то удаляем последнюю строку и добавляем новую. 0

@proggamer12 17 / 17 / 4 Регистрация: 06.07.2012 Сообщений: 510
	17.12.2018, 12:03
	Спасибо за ответ! 0