Un TPairSplitter est un composant qui peut être placé sur un panneau ou une fiche et fournit deux sous-composants TPairSplitterSide. .

Dans l'exmple du dessous, un TPaintBox est placé dans chaque 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.

Voir aussi

• Doc. TPairSplitter
• TSplitter

From the Free Pascal wiki, page "TPairSplitter/fr", as it stood on 2020-03-01 after a change by Trev, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's Licensing page. If you have concerns about this material, message the admin.