ychatu9.dfm

来自「Yahoo Messenger for Mobile」· DFM 代码 · 共 234 行

object Form9: TForm9
  Left = 205
  Top = 125
  AutoScroll = False
  BorderIcons = []
  Caption = 'Fade Selector...'
  ClientHeight = 222
  ClientWidth = 464
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 8
    Top = 4
    Width = 20
    Height = 13
    Caption = 'Red'
    Color = clRed
    ParentColor = False
  end
  object Label3: TLabel
    Left = 6
    Top = 74
    Width = 21
    Height = 13
    Caption = 'Blue'
    Color = clAqua
    ParentColor = False
  end
  object Label4: TLabel
    Left = 3
    Top = 34
    Width = 29
    Height = 13
    Caption = 'Green'
    Color = clLime
    ParentColor = False
  end
  object Label2: TLabel
    Left = 211
    Top = 2
    Width = 65
    Height = 87
    AutoSize = False
    OnDblClick = Label2DblClick
  end
  object Label5: TLabel
    Left = 6
    Top = 132
    Width = 46
    Height = 13
    Caption = 'Color Tag'
  end
  object ScrollBar1: TScrollBar
    Left = 39
    Top = 2
    Width = 121
    Height = 16
    BiDiMode = bdLeftToRight
    Max = 255
    PageSize = 0
    ParentBiDiMode = False
    TabOrder = 0
    OnChange = ScrollBar1Change
  end
  object ScrollBar2: TScrollBar
    Left = 39
    Top = 34
    Width = 121
    Height = 16
    Max = 255
    PageSize = 0
    TabOrder = 1
    OnChange = ScrollBar2Change
  end
  object ScrollBar3: TScrollBar
    Left = 41
    Top = 68
    Width = 121
    Height = 16
    Max = 255
    PageSize = 0
    TabOrder = 2
    OnChange = ScrollBar3Change
  end
  object Edit1: TEdit
    Left = 168
    Top = 0
    Width = 27
    Height = 21
    TabOrder = 3
    Text = '0'
  end
  object Edit2: TEdit
    Left = 168
    Top = 32
    Width = 27
    Height = 21
    TabOrder = 4
    Text = '0'
  end
  object Edit3: TEdit
    Left = 169
    Top = 64
    Width = 28
    Height = 21
    TabOrder = 5
    Text = '0'
  end
  object Edit4: TEdit
    Left = 60
    Top = 126
    Width = 213
    Height = 21
    TabOrder = 6
  end
  object Panel1: TPanel
    Left = 248
    Top = 96
    Width = 25
    Height = 23
    Caption = 'LU'
    Color = 16744703
    TabOrder = 7
    OnDblClick = Panel1DblClick
  end
  object Button1: TButton
    Left = 8
    Top = 96
    Width = 79
    Height = 25
    Caption = 'Add Colour'
    TabOrder = 8
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 94
    Top = 96
    Width = 71
    Height = 25
    Caption = 'Delete Color'
    TabOrder = 9
    OnClick = Button2Click
  end
  object ListBox1: TListBox
    Left = 286
    Top = 6
    Width = 175
    Height = 143
    ItemHeight = 16
    Style = lbOwnerDrawFixed
    TabOrder = 10
    OnDrawItem = ListBox1DrawItem
  end
  object Button3: TButton
    Left = 408
    Top = 160
    Width = 51
    Height = 25
    Caption = 'Close'
    TabOrder = 11
    OnClick = Button3Click
  end
  object RadioButton1: TRadioButton
    Left = 10
    Top = 162
    Width = 101
    Height = 17
    Caption = 'Fade The Text'
    Checked = True
    TabOrder = 12
    TabStop = True
    OnClick = RadioButton1Click
  end
  object RadioButton2: TRadioButton
    Left = 120
    Top = 162
    Width = 89
    Height = 17
    Caption = 'Alternate EL'
    TabOrder = 13
    OnClick = RadioButton2Click
  end
  object Button4: TButton
    Left = 336
    Top = 160
    Width = 63
    Height = 25
    Caption = 'Clear All'
    TabOrder = 14
    OnClick = Button4Click
  end
  object RadioButton3: TRadioButton
    Left = 218
    Top = 162
    Width = 95
    Height = 17
    Caption = 'Alternate EW'
    Enabled = False
    TabOrder = 15
  end
  object Richedit1: TMyRichEdit
    Left = 6
    Top = 186
    Width = 451
    Height = 29
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 16
  end
  object Button5: TButton
    Left = 172
    Top = 96
    Width = 67
    Height = 25
    Caption = 'Insert Color'
    TabOrder = 17
    OnClick = Button5Click
  end
end