Интерфейс

Разделитель, реализованный на базе класса Line.Предназначен для пропорционального изменения размеров двух обьектов при перетаскивании разделителя.

*При небольшой доработке можно преобразовать в вуртикальный splitbar *THISform.grid1,THISform.grid2 обьекты формы, размеры которых надо менять thisform.addobject([LINE],[DELIMITER]) &&Добавили разделитель THISform.LINE.LEFT=THISform.grid1.width+1 THISform.LINE.TOP=THISform.grid1.TOP THISform.LINE.WIDTH=0 THISform.LINE.HEIGHT=THISform.grid1.HEIGHT THISform.LINE.VISIBLE=.T. THISform.LINE.lefttopmin=30&&Минимальный размер левого обьекта THISform.LINE.rightdownmin=30&&Минимальный размер правого обьекта THISform.LINE.LEFTOBJECT=[GRID1]&&Левый обьект THISform.LINE.RIGHTOBJECT=[GRID2]&&Правый обьект

Автор: Алексей