Класс предназначен для автоматического изменения ширины колонок в Grid'e при его Resize.
Идея создания этого класса пришла из 1С, уж больно понравились тамошние таблички ;-).
Для приминения класса необходимо выполнить всего три пункта:
- добавить класс в свой проект;
- поместить его на форму;
- заполнить свойство c именем "grid".
Для приминения класса необходимо выполнить всего три пункта:
- добавить класс в свой проект;
- поместить его на форму;
- заполнить свойство c именем "grid".
Свойства класса:
- grid: ссылка на грид, тип символьный (пример: This.Parent.Grid1 или ='ThisForm.Grid2' или ThisForm.Grid3).
- enabled: активирует(.T.)/деактивирует(.F.) действие класса на Grid, тип логический.
- proporcional: .T.-ширина колонок изменяется пропорцинально их первоначальным размерам; .F.-ширина колонок изменяется равномерно.
- SaveUserConfig(добавлено в новой версии): .T.-сохранять размер колонок, настроеных пользователем; .F.-не сохранять.
При изменении размеров колонок учитываются значения их свойств Resizable и Visible, а также свойств самого Grid'a(ScrollBars, RecordMark, DeleteMark и т.д.).
В архив с классом вложена форма-пример.
Автор: kexby
Автор публикации
Комментарии: 0Публикации: 1Регистрация: 19-12-2005
Вложенные файлы
# |
Название |
Тип файла |
Размер |
|---|---|---|---|
| 1 | 580rszgrid | .zip | 7,63 КБ |