JS+
Усиленный язык сценариев для Windows
с возможностью встраивания
в ваши приложения
О языке JS+ Справочник Скачать JS+ DLL
Контакты
СПРАВОЧНИК ПО ЯЗЫКУ JS+ Содержание

TSplitter

- визуальный компонент
Компоненты JS+
Определяет вертикальный или горизонтальный разделитель между соседними компонентами, позволяющий взаимосвязанно менять их размеры.

Создание объекта

splObj=new TSplitter(Parent);

Собственные свойства
Свойство Тип Описание
AutoSnap Boolean автоматически устанавливать размер уменьшаемого компонента в 0, если его размер стал меньше размера MinSize
Beveled Boolean отображать валик вдоль разделителя
MinSize Number минимальный размер уменьшаемого компонента
ResizeStyle Enum визуальный эффект при перемещении разделителя (см. ниже)
Только чтение
Canvas TCanvas дескриптор графической канвы

Свойство ResizeStyle
Значение Описание
rsNone отсутствие визуального сопровождения до окончания перемещения
rsLine отображение линии вместо разделителя до окончания перемещения
rsPattern отображение штрихового шаблона вместо разделителя до окончания перемещения (по умолчанию)
rsUpdate синхронное изменение размеров разделяемых компонентов одновременно с перемещением разделителя

Стандартные свойства

Стандартные методы

Собственные события
Событие Описание
OnCanResize произойдет перемещение разделителя в указанную позицию
OnMoved произошло перемещение разделителя
OnPaint требуется отрисовка разделителя

Стандартные события

Пример (JS+)
// Главная форма
frm=new TForm();
frm.Caption="JS+ - визуальный компонент TSplitter";
frm.Width =600;
frm.Height=450;

// Строка состояния
stb=new TStatusBar(frm);
stb.SimpleText=" Двигайте разделитель между панелями";

// Панель закладок
pgc=new TPageControl(frm);
pgc.SetBounds(10,10,frm.ClientWidth-20,stb.Top-20);

// Закладки
for (i=0;i<2;i++) {
  tsh=new TTabSheet(pgc);
  tsh.Caption=(i==0) ? "Горизонтальный" : "Вертикальный";

  // Панель на закладке
  pnl=new TPanel(tsh);
  pnl.SetBounds(4,4,tsh.ClientWidth-8,tsh.ClientHeight-8);

  // Нижняя/правая панель
  pn2=new TPanel(pnl);
  pn2.BorderStyle=bsSingle;
  pn2.Color=clWhite;

  switch (i) {
    case 0: pn2.Caption="Нижняя панель";
            pn2.Align=alBottom;
            pn2.Height=pnl.ClientHeight/2-5;
            d=pn2.TextHeight(pn2.Caption);
            break;

    case 1: pn2.Caption="Правая панель";
            pn2.Align=alRight;
            pn2.Width=pnl.ClientWidth/2-5;
            d=pn2.TextWidth(pn2.Caption);
  }

  // Разделитель
  spl=new TSplitter(pnl);
  spl.ResizeStyle=rsUpdate;
  spl.Beveled=true;

  switch (i) {
    case 0: spl.Align=alBottom;
            spl.Height=9;
            spl.MinSize=d+40;
            break;

    case 1: spl.Align=alRight;
            spl.Width=9;
            spl.MinSize=d+20;
  }

  // Верхняя/левая панель
  pn1=new TPanel(pnl);
  pn1.BorderStyle=bsSingle;
  pn1.Color=clWhite;
  pn1.Align=alClient;

  switch (i) {
    case 0: pn1.Caption="Верхняя панель"; break;
    case 1: pn1.Caption="Левая панель";
  }
}

frm.ShowModal();
Совместимость
C++ Builder/Delphi
JS+Руководство пользователя
Адрес этой страницы: http://jsplus.ru/MANUAL/JSPlus/Component/TSplitter.htm
© 2024,