Компонент AdvGrid обогащает родительский класс TStringGrid перечисленными далее методами.

procedure RemoveRows(Rowlndex, RCount: Longlnt);
Удаляет RCount рядов, начиная с ряда Rowlndex. procedure InsertRows(Rowlndex, RCount: Longlnt);
Вставляет RCount рядов справа от ряда Rowlndex. procedure RemoveCols(Collndex, CCount: Longlnt);
Удаляет CCount колонок начиная с колонки Collndex. procedure InsertCols(Collndex, CCount: Longlnt);
Вставляет CCount рядов начиная с ряда Collndex. procedure Clear;

Очищает таблицу.

function isCell(SubStr: String;
var ACol, ARow: Longlnt): Boolean;

Ищет в ячейках подстроку SubStr и, если подстрока найдена, возвращает координаты содержащей ее ячейки.

procedure SaveToFile(FileName: String);
Сохраняет таблицу в файле, procedure LoadFromFile(FileName: String);
Читает таблицу из файла, function CellToReal(ACol, ARow: Longlnt): Real;

Преобразует, если это возможно, текст из ячейки в вещественное число.

Автор компонента - Artem A. Berman (адрес электронной почты: art@aber. kherson.ua).

Исходный текст этого компонента находится в папке Grids\AdvGrid.

16.9. Таблицы и сетки || Оглавление || 16.9.3. Компонент MGrid


Искусство создания компонентов Delphi



Новости за месяц

  • Январь
    2020
  • Пн
  • Вт
  • Ср
  • Чт
  • Пт
  • Сб
  • Вс