unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, uEditorBase, JvAppStorage, JvAppRegistryStorage,
  JvComponentBase, JvFormPlacement, ImgList, PngImageList, StdActns,
  ActnList, ComCtrls, TBX, TB2Item, TB2Dock, TB2Toolbar, pngimage,
  ExtCtrls, JvExControls, JvComponent, JvNavigationPane, uCustomView,
  uViewBase, Unit2;

type
  TfEditorBase1 = class(TfEditorBase)
    frViewBase21: TfrViewBase2;
    procedure JvFormStorageRestorePlacement(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  fEditorBase1: TfEditorBase1;

implementation

{$R *.dfm}

procedure TfEditorBase1.JvFormStorageRestorePlacement(Sender: TObject);
begin
  inherited;
  Invalidate;
end;

end.