[JVCL-Checkins] dev/JVCL3/examples/JvAppStorage/SubStorage Example JvAppStorageSubStorageMainFrm.dfm,1.1,1.2 JvAppStorageSubStorageMainFrm.pas,1.1,1.2 - Now compiles again

[Olivier S. <ob...@us...>]

Update of /cvsroot/jvcl/dev/JVCL3/examples/JvAppStorage/SubStorage Example
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv1763/dev/JVCL3/examples/JvAppStorage/SubStorage Example

Modified Files:
	JvAppStorageSubStorageMainFrm.dfm 
	JvAppStorageSubStorageMainFrm.pas 
Log Message:
Now compiles again


Index: JvAppStorageSubStorageMainFrm.pas
===================================================================
RCS file: /cvsroot/jvcl/dev/JVCL3/examples/JvAppStorage/SubStorage Example/JvAppStorageSubStorageMainFrm.pas,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** JvAppStorageSubStorageMainFrm.pas	28 Feb 2005 08:29:36 -0000	1.1
--- JvAppStorageSubStorageMainFrm.pas	5 Apr 2006 12:20:48 -0000	1.2
***************
*** 34,38 ****
    JvAppDBStorage, JvAppStorageSelectList, JvAppStorage, JvAppIniStorage,
    JvComponent, JvAppRegistryStorage, ExtCtrls, ComCtrls, ToolWin, StdCtrls,
!   ShellAPI, Menus, jvDynControlEngine, jvDynControlEngineJVCL;
  
  type
--- 34,38 ----
    JvAppDBStorage, JvAppStorageSelectList, JvAppStorage, JvAppIniStorage,
    JvComponent, JvAppRegistryStorage, ExtCtrls, ComCtrls, ToolWin, StdCtrls,
!   ShellAPI, Menus, jvDynControlEngine, jvDynControlEngineJVCL, JvComponentBase;
  
  type
***************
*** 82,86 ****
      procedure CheckStorageKind;
    protected
!     procedure loaded; override;
      { Private declarations }
    public
--- 82,86 ----
      procedure CheckStorageKind;
    protected
!     procedure Loaded; override;
      { Private declarations }
    public
***************
*** 176,180 ****
  end;
  
! procedure TJvAppStorageSubStorageMainForm.loaded;
  begin
    CheckStorageKind;
--- 176,180 ----
  end;
  
! procedure TJvAppStorageSubStorageMainForm.Loaded;
  begin
    CheckStorageKind;

Index: JvAppStorageSubStorageMainFrm.dfm
===================================================================
RCS file: /cvsroot/jvcl/dev/JVCL3/examples/JvAppStorage/SubStorage Example/JvAppStorageSubStorageMainFrm.dfm,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** JvAppStorageSubStorageMainFrm.dfm	28 Feb 2005 08:29:36 -0000	1.1
--- JvAppStorageSubStorageMainFrm.dfm	5 Apr 2006 12:20:48 -0000	1.2
***************
*** 45,48 ****
--- 45,49 ----
          Align = alTop
          Caption = 'Stored Memo:'
+         ExplicitWidth = 66
        end
        object Memo2: TMemo
***************
*** 175,179 ****
      ButtonWidth = 148
      Caption = 'ToolBar1'
-     EdgeBorders = []
      EdgeInner = esNone
      EdgeOuter = esNone
--- 176,179 ----
***************
*** 236,240 ****
    object JvFormStorage1: TJvFormStorage
      AppStorage = JvAppStorage1
!     AppStoragePath = '%FORM_NAME%\'
      OnRestorePlacement = JvFormStorage1RestorePlacement
      StoredProps.Strings = (
--- 236,240 ----
    object JvFormStorage1: TJvFormStorage
      AppStorage = JvAppStorage1
!     AppStoragePath = 'JvAppStorageSubStorageMainForm\'
      OnRestorePlacement = JvFormStorage1RestorePlacement
      StoredProps.Strings = (
***************
*** 283,286 ****
--- 283,287 ----
      StorageOptions.AutoEncodeEntity = False
      StorageOptions.AutoIndent = True
+     StorageOptions.InvalidCharReplacement = '_'
      FileName = 'AppStorageExample3.xml'
      RootNodeName = 'Configuration'