main.dfm

1. It is located in the root directory - SecurityBuilderDemo.exe. Leave password box blank and click

object MainForm: TMainForm
  Left = 228
  Top = 238
  Width = 820
  Height = 434
  Caption = 'MDI Application'
  Color = clAppWorkSpace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'Default'
  Font.Style = []
  FormStyle = fsMDIForm
  Menu = MainMenu1
  OldCreateOrder = False
  Position = poDefault
  WindowMenu = Window1
  PixelsPerInch = 96
  TextHeight = 13
  object StatusBar: TStatusBar
    Left = 0
    Top = 369
    Width = 812
    Height = 19
    AutoHint = True
    Panels = <>
    SimplePanel = True
  end
  object ToolBar2: TToolBar
    Left = 0
    Top = 0
    Width = 812
    Height = 33
    BorderWidth = 1
    ButtonHeight = 25
    Color = clBtnFace
    Images = ImageList1
    Indent = 5
    ParentColor = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    Wrapable = False
    object ToolButton9: TToolButton
      Left = 5
      Top = 2
      Action = abFileNew1
    end
    object ToolButton1: TToolButton
      Left = 28
      Top = 2
      Action = abFileOpen1
    end
    object ToolButton2: TToolButton
      Left = 51
      Top = 2
      Action = abFileSave1
    end
    object ToolButton3: TToolButton
      Left = 74
      Top = 2
      Width = 8
      Caption = 'ToolButton3'
      ImageIndex = 2
      Style = tbsSeparator
    end
    object ToolButton4: TToolButton
      Left = 82
      Top = 2
      Action = abEditCut1
    end
    object ToolButton5: TToolButton
      Left = 105
      Top = 2
      Action = abEditCopy1
    end
    object ToolButton6: TToolButton
      Left = 128
      Top = 2
      Action = abEditPaste1
    end
    object ToolButton7: TToolButton
      Left = 151
      Top = 2
      Width = 8
      Caption = 'ToolButton7'
      ImageIndex = 3
      Style = tbsSeparator
    end
    object ToolButton8: TToolButton
      Left = 159
      Top = 2
      Action = abWindowCascade1
    end
    object ToolButton10: TToolButton
      Left = 182
      Top = 2
      Action = abWindowTileHorizontal1
    end
    object ToolButton11: TToolButton
      Left = 205
      Top = 2
      Action = abWindowTileVertical1
    end
    object btnCheckRights: TBitBtn
      Left = 228
      Top = 2
      Width = 109
      Height = 25
      Action = abAutoGenerated1
      Caption = 'Check Rights'
      TabOrder = 0
      Glyph.Data = {
        42020000424D4202000000000000420000002800000010000000100000000100
        1000030000000002000000000000000000000000000000000000007C0000E003
        00001F0000001F7C1F7C1F7C1F7CE001E001E00100000000E001E00100000000
        E001E0011F7C1F7C1F7C1F7C0000E001E0010000E001E00100001F7CE0010000
        E00100001F7C1F7C1F7C0000000000000000E001E00100001F7C1F7C00000000
        00001F7C1F7C1F7C1F7C0000000000000000000000001F7C1F7C1F7C00001F7C
        1F7C1F7C1F7C1F7C1F7C000000000000000000001F7C1F7C0000000000000000
        1F7C1F7C1F7C1F7C1F7C1F7C1F7C00000000000000001F7C1F7C1F7C1F7C1F7C
        00001F7C1F7C1F7C1F7C1F7C1F7C00000000000000001F7C1F7C1F7C1F7C0000
        00001F7C1F7C1F7C1F7C1F7C1F7C00000000000000001F7C1F7C1F7C1F7C1F7C
        00001F7C1F7C1F7C1F7C1F7C00000000000000001F7C1F7C1F7C1F7C1F7C1F7C
        1F7C00001F7C1F7C1F7C1F7C0000000000000000000000001F7C1F7C1F001F7C
        00001F7C1F7C1F7C1F7C1F7C000000000000000000001F7C1F7C1F7C1F7C0000
        1F7C1F7C1F7C1F7C1F7C1F7C0000000000000000EF3D1F7C1F7C1F7C1F7C0000
        1F7C1F7C1F7C1F7C1F7C1F7C0000000000000000000000001F7C1F7C00001F7C
        1F7C1F7C1F7C1F7C1F7C1F7C1F7C000000000000000000000000000000000000
        1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C00000000000000000000000000001F7C
        1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
        1F7C1F7C1F7C}
    end
    object btnChangeUser: TBitBtn
      Left = 337
      Top = 2
      Width = 75
      Height = 25
      Action = abAutoGenerated2
      Caption = 'Change User'
      TabOrder = 1
    end
    object Button1: TButton
      Left = 412
      Top = 2
      Width = 240
      Height = 25
      Caption = 'Manually check ID= 30 (abSecurity1.CheckId(30)'
      TabOrder = 2
      OnClick = Button1Click
    end
  end
  object Memo1: TMemo
    Left = 186
    Top = 60
    Width = 197
    Height = 89
    Lines.Strings = (
      'Note that every TControl can be '
      'protected at design time and not just '
      'buttons and menus')
    TabOrder = 2
  end
  object MainMenu1: TMainMenu
    Images = ImageList1
    Left = 40
    Top = 200
    object File1: TMenuItem
      Caption = '&File'
      Hint = 'File related commands'
      object FileNewItem: TMenuItem
        Action = abFileNew1
      end
      object FileOpenItem: TMenuItem
        Action = abFileOpen1
      end
      object FileCloseItem: TMenuItem
        Action = abFileClose1
      end
      object FileSaveItem: TMenuItem
        Action = abFileSave1
      end
      object FileSaveAsItem: TMenuItem
        Action = abFileSaveAs1
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object FileExitItem: TMenuItem
        Action = abFileExit1
      end
    end
    object Edit1: TMenuItem
      Caption = '&Edit'
      Hint = 'Edit commands'
      object CutItem: TMenuItem
        Action = abEditCut1
      end
      object CopyItem: TMenuItem
        Action = abEditCopy1
      end
      object PasteItem: TMenuItem
        Action = abEditPaste1
      end
    end
    object Window1: TMenuItem
      Caption = '&Window'
      Hint = 'Window related commands'
      object WindowCascadeItem: TMenuItem
        Action = abWindowCascade1
      end
      object WindowTileItem: TMenuItem
        Action = abWindowTileHorizontal1
      end
      object WindowTileItem2: TMenuItem
        Action = abWindowTileVertical1
      end
      object WindowMinimizeItem: TMenuItem
        Action = abWindowMinimizeAll1
      end
      object WindowArrangeItem: TMenuItem
        Action = abWindowArrangeAll1
      end
    end
    object Help1: TMenuItem
      Caption = '&Help'
      Hint = 'Help topics'
      object HelpAboutItem: TMenuItem
        Action = abHelpAbout1
      end
    end
  end
  object OpenDialog: TOpenDialog