Yes it is possible :
if you are using Delphi XE3,XE4,XE5 :
you only need to remove seClient
from the StyleElements
property of your form :
Form3.StyleElements := [seFont, seBorder];
if you are using delphi xe2:
you should override the TFormStyleHook
class ,and catch the WM_ERASEBKGND
message , and return without processing the default message :
type
TFormStyleHookEx = class(TFormStyleHook)
procedure WMEraseBkgnd(var Message: TMessage); message WM_ERASEBKGND;
end;
{ TFormStyleHookEx }
procedure TFormStyleHookEx.WMEraseBkgnd(var Message: TMessage);
begin
Message.Result := 1;
end;
initialization
TStyleEngine.RegisterStyleHook(TForm3, TFormStyleHookEx);