Resize колонок Grid’a (версия 1.1)

Класс предназначен для автоматического изменения ширины колонок в Grid'e при его Resize.
Идея создания этого класса пришла из 1С, уж больно понравились тамошние таблички ;-).
Для приминения класса необходимо выполнить всего три пункта:
- добавить класс в свой проект;
- поместить его на форму;
- заполнить свойство 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

Автор публикации

не в сети 18 лет

kexby

0
Комментарии: 0Публикации: 1Регистрация: 19-12-2005
Вложенные файлы
#
Тип файла
Размер
Название
1 .zip 7,63 КБ 580rszgrid
Оставить комментарий
Авторизация
*
*
Генерация пароля