options.xfm

功能强大的ER图建模工具的源代码。 可以代替ERWin了

          Height = 13
          Caption = 'Header Preview'
        end
        object Label5: TLabel
          Left = 70
          Top = 28
          Width = 26
          Height = 13
          Alignment = taRightJustify
          Caption = 'Style:'
        end
        object TblHeaderLU: TComboBox
          Left = 100
          Top = 24
          Width = 140
          Height = 21
          Style = csDropDownList
          ItemHeight = 15
          TabOrder = 3
          OnChange = TblHeaderLUChange
        end
      end
    end
    object DBOptionsSheet: TTabSheet
      Caption = 'DBOptionsSheet'
      ImageIndex = 3
      object Label7: TLabel
        Left = 2
        Top = 12
        Width = 113
        Height = 13
        Alignment = taRightJustify
        Caption = 'Default Database Type:'
      end
      object DefDatabaseTypeCBox: TComboBox
        Left = 120
        Top = 8
        Width = 193
        Height = 21
        Style = csDropDownList
        Color = clBackground
        ItemHeight = 15
        TabOrder = 1
        OnChange = DefDatabaseTypeCBoxChange
      end
      object ReservedWordsMemo: TMemo
        Left = 120
        Top = 40
        Width = 191
        Height = 191
        ScrollBars = ssVertical
        TabOrder = 2
      end
      object Label10: TLabel
        Left = 32
        Top = 42
        Width = 83
        Height = 13
        Alignment = taRightJustify
        Caption = 'Reserved Words:'
      end
      object GroupBox6: TGroupBox
        Left = 326
        Top = 2
        Width = 223
        Height = 215
        Caption = 'Various'
        TabOrder = 4
        object Label11: TLabel
          Left = 15
          Top = 145
          Width = 87
          Height = 13
          Alignment = taRightJustify
          Caption = 'Font for SQL Text:'
        end
        object FontCBox: TComboBox
          Left = 16
          Top = 161
          Width = 141
          Height = 21
          DropDownCount = 16
          ItemHeight = 15
          TabOrder = 1
          Text = 'FontCBox'
        end
        object SQLFontSizeCBox: TComboBox
          Left = 166
          Top = 161
          Width = 41
          Height = 21
          Style = csDropDownList
          ItemHeight = 15
          Items.Strings = (
            '7'
            '8'
            '9'
            '10'
            '11'
            '12'
            '13'
            '14')
          ItemIndex = 1
          TabOrder = 2
          Text = '8'
        end
        object RenameReservedWordsCBox: TCheckBox
          Left = 14
          Top = 20
          Width = 197
          Height = 17
          Caption = 'Rename Reserved Words'
          TabOrder = 3
        end
        object EncloseNamesCBox: TCheckBox
          Left = 14
          Top = 44
          Width = 195
          Height = 17
          Caption = 'Enclose names by quote character'
          TabOrder = 4
        end
        object DonotuseRelNameCbox: TCheckBox
          Left = 14
          Top = 70
          Width = 203
          Height = 17
          Caption = 'Do not use Relation Name in Ref.Def.'
          TabOrder = 5
        end
        object SyncDatatypesOfForeignKeysCBox: TCheckBox
          Left = 14
          Top = 96
          Width = 203
          Height = 17
          Caption = 'Sync Datatypes of FKs with PKs'
          TabOrder = 6
        end
        object AddQuotesToDefValsCBox: TCheckBox
          Left = 14
          Top = 122
          Width = 203
          Height = 17
          Caption = 'Add quotes to Default Values'
          TabOrder = 7
        end
      end
    end
    object DefEditingOptionsSheet: TTabSheet
      Caption = 'DefEditingOptionsSheet'
      ImageIndex = 2
      object GroupBox2: TGroupBox
        Left = 2
        Top = 2
        Width = 359
        Height = 55
        Caption = 'Default Table Settings'
        TabOrder = 0
        object Label18: TLabel
          Left = 21
          Top = 24
          Width = 94
          Height = 13
          Caption = 'Default Table Type:'
        end
        object DefaultTableTypeCBox: TComboBox
          Left = 123
          Top = 20
          Width = 214
          Height = 21
          Style = csDropDownList
          ItemHeight = 15
          Items.Strings = (
            'MYISAM  (Standard)'
            'InnoDB  (Transaction-safe tables with row locking)'
            'HEAP  (The data for this table is only stored in memory)'
            'BDB  (Transaction-safe tables with page locking)'
            'ISAM  (The original (old) table handler)'
            'MERGE  (A collection of MyISAM tables used as one table)')
          ItemIndex = 0
          TabOrder = 1
          Text = 'MYISAM  (Standard)'
        end
      end
      object GroupBox3: TGroupBox
        Left = 2
        Top = 68
        Width = 359
        Height = 143
        Caption = 'Default Relation Settings / Foreign Keys Settings'
        TabOrder = 1
        object Label19: TLabel
          Left = 41
          Top = 64
          Width = 297
          Height = 13
          Caption = 
            'if Reference Definition is activated for the Relation (for InnoD' +
            'B)'
        end
        object TableNameInRefsCBox: TCheckBox
          Left = 22
          Top = 85
          Width = 309
          Height = 19
          Hint = 
            'The name of the soure table will be included in the foreign key ' +
            'columns'#39' name'
          Caption = 'Add Source Table Name to Foreign Key Columns'#39' Names'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
        end
        object Label23: TLabel
          Left = 22
          Top = 113
          Width = 88
          Height = 13
          Caption = 'Foreign Key Prefix:'
        end
        object FKPrefixEd: TEdit
          Left = 114
          Top = 109
          Width = 43
          Height = 21
          Hint = 'Prefix that will be added to all foreign key columns'#39' name'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 2
        end
        object Label24: TLabel
          Left = 171
          Top = 113
          Width = 93
          Height = 13
          Caption = 'Foreign Key Postfix:'
        end
        object FKPostfixEd: TEdit
          Left = 268
          Top = 109
          Width = 43
          Height = 21
          Hint = 'Postfix that will be added to all foreign key columns'#39' name'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 4
        end
        object CreateFKRefDefIndexCBox: TCheckBox
          Left = 22
          Top = 47
          Width = 317
          Height = 19
          Hint = 
            'The Reference Definition will be turned on by default for new Re' +
            'lations'
          Caption = 'Automatically create Index on FK Fields in Destination Table'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 5
        end
        object ActivateRefDefForNewRelationsCBox: TCheckBox
          Left = 22
          Top = 21
          Width = 289
          Height = 19
          Hint = 
            'The Reference Definition will be turned on by default for new Re' +
            'lations'
          Caption = 'Activate Reference Definitions for all new Relations'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 6
        end
      end
      object GroupBox1: TGroupBox
        Left = 380
        Top = 2
        Width = 159
        Height = 83
        Caption = ' '
        TabOrder = 3
        object GridWidthLbl: TLabel
          Left = 17
          Top = 24
          Width = 50
          Height = 13
          Alignment = taRightJustify
          Caption = 'Grid width:'
        end
        object GridXEd: TEdit
          Left = 72
          Top = 20
          Width = 39
          Height = 21
          TabOrder = 1
        end
        object GridHeightLbl: TLabel
          Left = 13
          Top = 52
          Width = 54
          Height = 13
          Alignment = taRightJustify
          Caption = 'Grid height:'
        end
        object GridYEd: TEdit
          Left = 72
          Top = 48
          Width = 39
          Height = 21
          TabOrder = 3
        end
        object GridWidthUnitsLbl: TLabel
          Left = 116
          Top = 24
          Width = 24
          Height = 13
          Caption = 'Units'
        end
        object GridHeightUnitsLbl: TLabel
          Left = 116
          Top = 52
          Width = 24
          Height = 13
          Caption = 'Units'
        end
      end
      object UsePosGridCBox: TCheckBox
        Left = 390
        Top = -1
        Width = 121
        Height = 19
        Caption = 'Enable Snap to Grid'
        TabOrder = 2
        OnClick = UsePosGridCBoxClick
      end
      object EditOptionsTipPanel: TPanel
        Left = 380
        Top = 97
        Width = 159
        Height = 114
        Color = clInfoBk
        TabOrder = 4
        Visible = False
        object Label8: TLabel
          Left = 8
          Top = 4
          Width = 143
          Height = 39
          AutoSize = False
          Caption = 
            'These parameters are the default settings when a new model is cr' +
            'eated.'
          WordWrap = True
        end
        object Label9: TLabel
          Left = 8
          Top = 48
          Width = 145
          Height = 53
          AutoSize = False
          Caption = 
            'They can be turned on/off for each model individually using the ' +
            'Model Options Dialog.'
          WordWrap = True
        end
      end
    end
  end
  object BottomPnl: TPanel
    Left = 0
    Top = 307
    Width = 744
    Height = 35
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 1
    object AbortBtn: TSpeedButton
      Left = 702
      Top = 0
      Width = 23
      Height = 22
      Enabled = False