unit u_select_curr; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, bsSkinCtrls; type Tfrm_select_curr = class(TForm) bsSkinPanel1: TbsSkinPanel; bsSkinButton1: TbsSkinButton; bsSkinButton2: TbsSkinButton; bsSkinRadioGroup1: TbsSkinRadioGroup; private { Private declarations } public { Public declarations } end; var frm_select_curr: Tfrm_select_curr; implementation uses u_main; {$R *.dfm} end.