1 unit umain;
2 
3 {$mode objfpc}{$H+}
4 
5 interface
6 
7 uses
8   Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, BCListBox;
9 
10 type
11 
12   { TForm1 }
13 
14   TForm1 = class(TForm)
15     BCPaperListBox1: TBCPaperListBox;
16     BCPaperListBox2: TBCPaperListBox;
17   private
18     { private declarations }
19   public
20     { public declarations }
21   end;
22 
23 var
24   Form1: TForm1;
25 
26 implementation
27 
28 {$R *.lfm}
29 
30 end.
31 
32