myeff.dfm

themeengine6源码

        FXMouseEnter = '[ FADE ] - SmoothDiagonalIn'
        FXMouseLeave = '[ FADE ] - SmoothDiagonalOut'
      end
      object TeSpeedDivider2: TTeSpeedDivider
        Left = 113
        Top = 2
        Width = 8
        Height = 37
      end
      object TeSpeedDivider3: TTeSpeedDivider
        Left = 195
        Top = 2
        Width = 8
        Height = 37
      end
    end
    object TeToolBar2: TTeToolBar
      Left = 65
      Top = 47
      Width = 301
      Height = 29
      BorderWidth = 2
      ButtonWidth = 70
      ButtonAutoSize = False
      DividerWidth = 8
      ThemeObject = 'default'
      object tefxSpeedButton6: TtefxSpeedButton
        Left = 2
        Top = 2
        Width = 70
        Height = 25
        OnClick = EditCopy1Execute
        Action = EditCopy1
        BlackAndWhiteGlyph = False
        Caption = '&Copy'
        Flat = True
        ThemeObject = 'default'
        FXEnabled = True
        FXTime = 100
        FXMouseEnter = '[ FADE ] - SmoothDiagonalIn'
        FXMouseLeave = '[ FADE ] - SmoothDiagonalOut'
      end
      object tefxSpeedButton9: TtefxSpeedButton
        Left = 72
        Top = 2
        Width = 70
        Height = 25
        OnClick = EditCut1Execute
        Action = EditCut1
        BlackAndWhiteGlyph = False
        Caption = 'Cu&t'
        Flat = True
        ThemeObject = 'default'
        FXEnabled = True
        FXTime = 100
        FXMouseEnter = '[ FADE ] - SmoothDiagonalIn'
        FXMouseLeave = '[ FADE ] - SmoothDiagonalOut'
      end
      object tefxSpeedButton8: TtefxSpeedButton
        Left = 142
        Top = 2
        Width = 70
        Height = 25
        OnClick = EditPaste1Execute
        Action = EditPaste1
        BlackAndWhiteGlyph = False
        Caption = '&Paste'
        Flat = True
        ThemeObject = 'default'
        FXEnabled = True
        FXTime = 100
        FXMouseEnter = '[ FADE ] - SmoothDiagonalIn'
        FXMouseLeave = '[ FADE ] - SmoothDiagonalOut'
      end
      object tefxSpeedButton7: TtefxSpeedButton
        Left = 212
        Top = 2
        Width = 70
        Height = 25
        OnClick = EditUndo1Execute
        Action = EditUndo1
        BlackAndWhiteGlyph = False
        Caption = '&Undo'
        Flat = True
        ThemeObject = 'default'
        FXEnabled = True
        FXTime = 100
        FXMouseEnter = '[ FADE ] - SmoothDiagonalIn'
        FXMouseLeave = '[ FADE ] - SmoothDiagonalOut'
      end
    end
  end
  object TeComboBox1: TTeComboBox
    Left = 90
    Top = 92
    Width = 261
    Height = 21
    Cursor = crIBeam
    BevelWidth = 1
    BorderWidth = 3
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 3
    OnChange = TeSpinEdit1Change
    AutoComplete = False
    ComboStyle = kcsDropDownList
  end
  object TeComboBox2: TTeComboBox
    Left = 90
    Top = 118
    Width = 261
    Height = 21
    Cursor = crIBeam
    BevelWidth = 1
    BorderWidth = 3
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 4
    OnChange = TeSpinEdit1Change
    AutoComplete = False
    ComboStyle = kcsDropDownList
  end
  object TeSpinEdit1: TTeSpinEdit
    Left = 52
    Top = 144
    Width = 93
    Height = 21
    Cursor = crIBeam
    BevelWidth = 1
    BorderWidth = 3
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    Text = '300'
    OnChange = TeSpinEdit1Change
    ParentColor = False
    Increment = 50
    MaxValue = 3000
    MinValue = 50
    Value = 300
    ButtonAlign = baRight
    ButtonTransparent = False
    ButtonShowHint = False
    ButtonWidth = 15
    DownGlyph.Data = {
      0E010000424D0E01000000000000360000002800000009000000060000000100
      200000000000D800000000000000000000000000000000000000008080000080
      8000008080000080800000808000008080000080800000808000008080000080
      8000008080000080800000808000000000000080800000808000008080000080
      8000008080000080800000808000000000000000000000000000008080000080
      8000008080000080800000808000000000000000000000000000000000000000
      0000008080000080800000808000000000000000000000000000000000000000
      0000000000000000000000808000008080000080800000808000008080000080
      800000808000008080000080800000808000}
    EnabledSlider = False
    UpGlyph.Data = {
      0E010000424D0E01000000000000360000002800000009000000060000000100
      200000000000D800000000000000000000000000000000000000008080000080
      8000008080000080800000808000008080000080800000808000008080000080
      8000000000000000000000000000000000000000000000000000000000000080
      8000008080000080800000000000000000000000000000000000000000000080
      8000008080000080800000808000008080000000000000000000000000000080
      8000008080000080800000808000008080000080800000808000000000000080
      8000008080000080800000808000008080000080800000808000008080000080
      800000808000008080000080800000808000}
    ButtonData = (
      False
      0
      ''
      ''
      False
      False
      15)
  end
  object tefxCheckBox1: TtefxCheckBox
    Left = 292
    Top = 156
    Width = 149
    Height = 20
    Caption = 'tefxCheckBox1'
    AllowGrayed = False
    Alignment = kalLeftJustify
    Checked = False
    Spacing = 5
    State = kcbsUnChecked
    ThemeObject = 'default'
    TabOrder = 6
    Transparent = True
    WordWrap = False
    FXEnabled = True
    FXTime = 100
    FXMouseEnter = '[ FADE ] - SmoothDiagonalIn'
    FXMouseLeave = '[ FADE ] - SmoothDiagonalOut'
  end
  object tefxRadioButton1: TtefxRadioButton
    Left = 292
    Top = 184
    Width = 147
    Height = 20
    Caption = 'tefxRadioButton1'
    Alignment = kalLeftJustify
    Checked = False
    GroupIndex = 0
    Spacing = 5
    ThemeObject = 'default'
    TabOrder = 7
    WordWrap = False
    FXEnabled = True
    FXTime = 100
    FXMouseEnter = '[ FADE ] - SmoothDiagonalIn'
    FXMouseLeave = '[ FADE ] - SmoothDiagonalOut'
  end
  object TeForm1: TTeForm
    Animation.EffectKind = '[ FADE ] - SmoothDiagonalIn'
    Gravitation.OwnedForm = False
    SystemMenuLinkMerge = False