После перехода с паскаля на delphi многие задаются вопросом как отсортировать Stringgrid. Компонент таблицы Stringgrid по сути представляет собой массив ячеек. На Pascal существует два основных метода сортировки массива:
- метод обмена, его еще называют методом “пузырька”, т.к. элементы в массиве как бы всплывая двигаются к первому.
- метод прямого выбора
Их нужно знать наизусть. Они могут применятся при сортировке данных по какому-либо критерию или для упрощения поиска в большом объеме данных.
Лабораторная работа №4
Цель: научиться сортировать.
Задание: написать приложение заполняющее таблицу случайными числами и сортирующее их по возрастанию.
Компоненты:
Stringgrid – таблица (cells – обращение к ячейкам, ColCount – количество столбцов, RowCount – количество строк)
Button – кнопка (Caption – надпись на кнопке)
Memo – текстовое поле (Text – текст, Lines – строки, LoadFromFile –загрузить из файла, Clear – очистить, AddStrings – добавить строки)
Свой объект: TStringlist – объект данного типа используется для хранения текстовых данных в виде массива строк.
Функции:
MySort – сортировка в TStringlist. В TStringlist есть метод Sort, который по-умолчанию сортирует по возрастанию. Но в задании было пояснение сделать сортировку по убыванию, поэтому мы использовали свою функцию MySort посредством стандартного метода CustomSort. Create – процедура создающая новый объект данного типа.
Вывод:
научились сортировать программно.
Собственно данный метод сортировки в delphi сокращает количество строк кода во много раз и позволяет производить сортировку как по алфавиту так и комбинировано с числами. Далее приведу скриншот программы:
В первую строку заносятся числа случайным образом. Во второй строке эти числа отображаются уже отсортированными. Числа сортировались методом пузырька по кнопке “отсортировать”. В программе также подсчитываются нижняя граница, верхняя граница и количество столбцов. По кнопке “открыть” мы можем загрузить текстовый файл в Memo. По кнопке “сортировать” строки сортируются.
Популярность: 18%
