델파이 Xe2 이상에서는 폼 themes를 적용 할 수 있습니다.

참고 할만한 곳 => http://theroadtodelphi.wordpress.com/2011/09/01/exploring-delphi-xe2-vcl-styles-part-i/





간단하게 적용 시켜 보면
uinit MainUnit;
interface
uses VCL.Themes, VCL.Styles;
implementation
{$R *.dfm}
const sStyleName: array [0..4] of string = ( 'Auric', 'Cyan Night','Silver','Slate Classico','Windows');
procedure TForm2.Button1Click(Sender: TObject);
begin
  if (Sender as TButton).tag = 4 then
    TStyleManager.SetStyle(FBasicStyle)
  else
    TStyleManager.SetStyle(sStyleName[(Sender as TButton).tag]);
end;
procedure TForm2.Button6Click(Sender: TObject);
begin
  if OpenDialog1.Execute then begin
      TStyleManager.SetStyle(TStyleManager.LoadFromFile(OpenDialog1.FileName));
  end;
end;
procedure TForm2.FormCreate(Sender: TObject);
begin
  FBasicStyle:= TStyleManager.ActiveStyle
end;
end.