⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 unitscrolls.dfm

📁 I mComputermaster programmisDelphi+pascal
💻 DFM
字号:
object FrameScrolls: TFrameScrolls
  Left = 0
  Top = 0
  Width = 497
  Height = 390
  TabOrder = 0
  object sGauge1: TsGauge
    Left = 27
    Top = 70
    Width = 233
    Height = 32
    SkinData.SkinSection = 'GAUGE'
    ForeColor = clBlack
    Suffix = '%'
  end
  object sGauge2: TsGauge
    Left = 288
    Top = 20
    Width = 32
    Height = 157
    Kind = gkVerticalBar
    SkinData.SkinSection = 'GAUGE'
    ForeColor = clBlack
    Suffix = '%'
  end
  object sTrackBar1: TsTrackBar
    Tag = 5
    Left = 26
    Top = 28
    Width = 234
    Height = 31
    Max = 100
    Frequency = 10
    Position = 47
    TabOrder = 0
    OnChange = sTrackBar1Change
    SkinData.SkinSection = 'TRACKBAR'
  end
  object sScrollBar1: TsScrollBar
    Tag = 5
    Left = 28
    Top = 111
    Width = 232
    Height = 34
    LargeChange = 10
    PageSize = 0
    Position = 47
    TabOrder = 1
    OnChange = sScrollBar2Change
    SkinManager = MainForm.sSkinManager1
  end
  object sScrollBar3: TsScrollBar
    Tag = 5
    Left = 371
    Top = 20
    Width = 16
    Height = 157
    Kind = sbVertical
    PageSize = 0
    Position = 47
    TabOrder = 2
    OnChange = sScrollBar2Change
    SkinManager = MainForm.sSkinManager1
  end
  object sComboBox1: TsComboBox
    Tag = 5
    Left = 192
    Top = 225
    Width = 133
    Height = 21
    Alignment = taLeftJustify
    BoundLabel.Active = True
    BoundLabel.Caption = 'SkinSection property :'
    BoundLabel.Indent = 0
    BoundLabel.Font.Charset = DEFAULT_CHARSET
    BoundLabel.Font.Height = -11
    BoundLabel.Font.Name = 'MS Sans Serif'
    BoundLabel.Font.Style = []
    BoundLabel.Layout = sclLeft
    BoundLabel.MaxWidth = 0
    BoundLabel.UseSkinColor = True
    SkinData.SkinSection = 'COMBOBOX'
    Font.Charset = DEFAULT_CHARSET
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 13
    ItemIndex = -1
    ParentFont = False
    TabOrder = 3
    OnChange = sComboBox1Change
    Items.Strings = (
      'GAUGE'
      'CHECKBOX'
      'PANEL_LOW'
      'PANEL'
      'BUTTON'
      'SPEEDBUTTON'
      'GROUPBOX'
      'EDIT')
  end
  object sComboBox2: TsComboBox
    Tag = 5
    Left = 192
    Top = 249
    Width = 133
    Height = 21
    Alignment = taLeftJustify
    BoundLabel.Active = True
    BoundLabel.Caption = 'ProgressBar SkinSection :'
    BoundLabel.Indent = 0
    BoundLabel.Font.Charset = DEFAULT_CHARSET
    BoundLabel.Font.Height = -11
    BoundLabel.Font.Name = 'MS Sans Serif'
    BoundLabel.Font.Style = []
    BoundLabel.Layout = sclLeft
    BoundLabel.MaxWidth = 0
    BoundLabel.UseSkinColor = True
    SkinData.SkinSection = 'COMBOBOX'
    Font.Charset = DEFAULT_CHARSET
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 13
    ItemIndex = -1
    ParentFont = False
    TabOrder = 4
    OnChange = sComboBox2Change
    Items.Strings = (
      'PANEL'
      'BUTTON'
      'GROUPBOX'
      'DIALOG'
      'PROGRESSH'
      'SPEEDBUTTON'
      'PROGRESSV')
  end
  object sProgressBar1: TsProgressBar
    Left = 28
    Top = 153
    Width = 232
    Height = 25
    BorderWidth = 1
    Position = 47
    TabOrder = 5
    SkinData.SkinSection = 'GAUGE'
  end
  object sTrackBar2: TsTrackBar
    Tag = 5
    Left = 395
    Top = 15
    Width = 40
    Height = 166
    Max = 100
    Orientation = trVertical
    Frequency = 10
    Position = 47
    TabOrder = 6
    OnChange = sTrackBar1Change
    SkinData.SkinSection = 'TRACKBAR'
  end
  object sProgressBar2: TsProgressBar
    Left = 328
    Top = 20
    Width = 32
    Height = 157
    BorderWidth = 1
    Orientation = pbVertical
    Position = 47
    TabOrder = 7
    SkinData.SkinSection = 'GAUGE'
  end
  object sFrameAdapter1: TsFrameAdapter
    SkinData.SkinSection = 'CHECKBOX'
    Left = 8
    Top = 4
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -