Как убрать внутреннюю рамку в MDI приложении

[Stannis]

Помогите, пожалуйста. Замучился уже.
Использую стандартные Delphi'йские скины. Добавляю на главную форму панели по бокам и после этого появляется белая рамка. В панелях, конечно, BorderStyle = bsNone, BevelOuter, BevelInner, BevelKind = bvNone. У формы, конечно, BorderStyle = bsSizeable. Но даже при bsNone все равно появляется белая (серая) рамка на всех скинах. Файл скина смотрел, редактировал - никак не влияет на рамку.

[Stannis]

В общем, нашел.

type
  TMyMDIForm = class(TForm)
  protected
    procedure ClientWndProc(var Message: TMessage); override;
  end;

procedure TMyMDIForm.ClientWndProc(var Message: TMessage);
var
  ExStyle: DWORD;
begin
  case Message.Msg of
  $3F:
    begin
      ExStyle := GetWindowLongPtr(ClientHandle, GWL_EXSTYLE);
      ExStyle := ExStyle and not WS_EX_CLIENTEDGE;
      SetWindowLongPtr(ClientHandle, GWL_EXSTYLE, ExStyle);
      SetWindowPos(ClientHandle, 0, 0,0,0,0, SWP_FRAMECHANGED or 
        SWP_NOACTIVATE or SWP_NOMOVE or SWP_NOSIZE or SWP_NOZORDER);
    end;
  else
    inherited;
  end;
end;