TPairSplitter/ru

│ English (en) │ français (fr) │ 日本語 (ja) │ русский (ru) │

TPairSplitter является компонентом, который может быть размещен на панели или форме, представляющим собой контейнер с двумя разделенными компонентами TPairSplitterSide.

В примере ниже два элемента TPaintBox размещены на каждом компоненте TPairSplitterSide.

unit Unit1;

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils, Forms,
  Controls, PairSplitter, ExtCtrls;

type
  TForm1 = class(TForm)
    PaintBox1: TPaintBox;
    PaintBox2: TPaintBox;
    PairSplitter1: TPairSplitter;
    PairSplitterSide1: TPairSplitterSide;
    PairSplitterSide2: TPairSplitterSide;
  end;

var
  Form1: TForm1;

implementation

{$R *.lfm}

{ TForm1 }

end.

См. также

• Документация по TPairSplitter
• TSplitter