edits.dfm

强大的皮肤控件 能做出美观的界面

object frmEdits: TfrmEdits
  Left = 367
  Top = 253
  AutoScroll = False
  BorderIcons = []
  Caption = 'Edit Demo'
  ClientHeight = 215
  ClientWidth = 450
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  PixelsPerInch = 96
  TextHeight = 13
  object Label2: TLabel
    Left = 10
    Top = 132
    Width = 43
    Height = 13
    Caption = 'Samples:'
    Transparent = True
  end
  object SeSkinEdit1: TSeSkinEdit
    Left = 10
    Top = 154
    Width = 335
    Height = 23
    Cursor = crIBeam
    Performance = kspDoubleBuffer
    Transparent = False
    AutoSize = True
    BevelSides = [kbsLeft, kbsTop, kbsRight, kbsBottom]
    BevelInner = kbvLowered
    BevelOuter = kbvLowered
    BevelKind = kbkSingle
    BevelWidth = 1
    BorderWidth = 3
    PasswordKind = pkNone
    TabOrder = 0
    Text = 'SeSkinEdit1'
    SkinObject = 'Edit'
    SkinEngine = frmMain.SeSkinEngine1
  end
  object SeSkinRadioGroup1: TSeSkinRadioGroup
    Left = 10
    Top = 10
    Width = 131
    Height = 113
    Performance = kspNoBuffer
    Transparent = True
    OnClick = SeSkinRadioGroup1Click
    CaptionMargin = 12
    TabOrder = 1
    Caption = 'Text Alignment'
    CheckBoxAlignment = ktaLeftJustify
    UseCheckBox = False
    SkinEngine = frmMain.SeSkinEngine1
    SkinObject = 'GroupBox'
    ItemIndex = 0
    Items.Strings = (
      'LeftJustify'
      'RightJustify'
      'Center')
  end
  object SeSkinGroupBox1: TSeSkinGroupBox
    Left = 148
    Top = 10
    Width = 289
    Height = 113
    Performance = kspNoBuffer
    Transparent = True
    CaptionMargin = 12
    TabOrder = 2
    Caption = 'Password'
    CheckBoxAlignment = ktaLeftJustify
    UseCheckBox = False
    SkinEngine = frmMain.SeSkinEngine1
    SkinObject = 'GroupBox'
    object Label1: TLabel
      Left = 126
      Top = 20
      Width = 25
      Height = 13
      Caption = 'Char:'
      Transparent = True
    end
    object NgRadioGroup1: TSeSkinRadioGroup
      Left = 10
      Top = 42
      Width = 269
      Height = 61
      Performance = kspNoBuffer
      Transparent = True
      OnClick = NgRadioGroup1Click
      CaptionMargin = 12
      TabOrder = 0
      Caption = 'Kind'
      CheckBoxAlignment = ktaLeftJustify
      UseCheckBox = False
      SkinEngine = frmMain.SeSkinEngine1
      SkinObject = 'GroupBox'
      Columns = 3
      ItemIndex = 0
      Items.Strings = (
        'Char'
        'Rect'
        'RoundRect'
        'Circle'
        'Triangle')
    end
    object SeSkinCheckBox1: TSeSkinCheckBox
      Left = 10
      Top = 18
      Width = 71
      Height = 20
      Performance = kspDoubleBuffer
      Transparent = True
      OnClick = SeSkinCheckBox1Click
      Caption = 'Enabled'
      AllowGrayed = False
      Alignment = ktaLeftJustify
      Checked = False
      Spacing = 5
      State = cbUnchecked
      WordWrap = False
      TabOrder = 1
      SkinEngine = frmMain.SeSkinEngine1
      SkinObject = 'CheckBox'
    end
    object SeSkinEdit2: TSeSkinEdit
      Left = 156
      Top = 16
      Width = 121
      Height = 23
      Cursor = crIBeam
      Performance = kspDoubleBuffer
      Transparent = False
      AutoSize = True
      BevelSides = [kbsLeft, kbsTop, kbsRight, kbsBottom]
      BevelInner = kbvLowered
      BevelOuter = kbvLowered
      BevelKind = kbkSingle
      BevelWidth = 1
      BorderWidth = 3
      PasswordKind = pkNone
      TabOrder = 2
      Text = '#'
      OnChange = SeSkinEdit2Change
      SkinObject = 'Edit'
      SkinEngine = frmMain.SeSkinEngine1
    end
  end
  object SeSkinCheckBox2: TSeSkinCheckBox
    Left = 9
    Top = 187
    Width = 109
    Height = 20
    Performance = kspDoubleBuffer
    Transparent = True
    OnClick = SeSkinCheckBox2Click
    Caption = 'Disable skin'
    AllowGrayed = False
    Alignment = ktaLeftJustify
    Checked = False
    Spacing = 5
    State = cbUnchecked
    WordWrap = False
    TabOrder = 3
    SkinObject = 'CheckBox'
  end
  object NgForm1: TSeSkinForm
    BorderIcons = [kbiClose, kbiSystemMenu, kbiMaximize, kbiRollup]
    BorderStyle = kbsStandard
    Caption = 'Edit Demo'
    Performance = ksfpNoBuffer
    StayOnTop = False
    StretchBackground = False
    WindowState = kwsNormal
    SkinEngine = frmMain.SeSkinEngine1
    SkinObject = 'Form'
    Left = 374
    Top = 144
  end
end