📄 ychatu28.dfm
字号:
object Form28: TForm28
Left = 269
Top = 134
AutoScroll = False
BorderIcons = []
Caption = 'Away/IM/PM Settings'
ClientHeight = 267
ClientWidth = 422
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object Label2: TLabel
Left = 4
Top = 186
Width = 102
Height = 13
Caption = 'Room Enter Message'
end
object Label3: TLabel
Left = 2
Top = 212
Width = 107
Height = 13
Caption = 'Room Leave Message'
end
object GroupBox1: TGroupBox
Left = 4
Top = 4
Width = 409
Height = 171
Caption = 'Away State'
TabOrder = 0
object ComboBox1: TspSkinComboBox
Left = 6
Top = 20
Width = 265
Height = 21
TabOrder = 0
DrawDefault = True
SkinData = Form1.spSkinData1
SkinDataName = 'combobox'
AlphaBlend = False
AlphaBlendValue = 200
UseSkinCursor = False
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
UseSkinFont = True
DefaultWidth = 0
DefaultHeight = 0
UseSkinSize = True
HideSelection = True
AutoComplete = True
HorizontalExtent = False
ImageIndex = -1
ListBoxUseSkinItemHeight = True
ListBoxAlphaBlend = False
ListBoxAlphaBlendAnimation = False
ListBoxAlphaBlendValue = 200
ListBoxWidth = 0
ListBoxCaptionMode = False
ListBoxUseSkinFont = True
ListBoxDefaultFont.Charset = DEFAULT_CHARSET
ListBoxDefaultFont.Color = clWindowText
ListBoxDefaultFont.Height = 14
ListBoxDefaultFont.Name = 'Arial'
ListBoxDefaultFont.Style = []
ListBoxDefaultCaptionFont.Charset = DEFAULT_CHARSET
ListBoxDefaultCaptionFont.Color = clWindowText
ListBoxDefaultCaptionFont.Height = 14
ListBoxDefaultCaptionFont.Name = 'Arial'
ListBoxDefaultCaptionFont.Style = []
ListBoxDefaultItemHeight = 20
ListBoxCaptionAlignment = taLeftJustify
CharCase = ecNormal
DefaultColor = clWindow
Text = 'I'#39'm Available'
Items.Strings = (
'I'#39'm Available'
'Be Right Back'
'On Vacation'
'Not at home'
'Not at my Desk'
'Not in the Office'
'On the phone'
'Stepped out to Lunch'
'Gone out'
'Custom Away')
ItemIndex = -1
DropDownCount = 8
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = 14
Font.Name = 'Arial'
Font.Style = []
Sorted = False
Style = spcbFixedStyle
OnChange = ComboBox1Change
end
object Memo1: TMemo
Left = 8
Top = 58
Width = 375
Height = 93
Lines.Strings = (
'I'#39'm not here right now, but if you leave your Name, '
'number and email address i will get back to you. Beeeeeeeeeeeeee' +
'ep')
TabOrder = 1
end
end
object Edit3: TEdit
Left = 114
Top = 180
Width = 277
Height = 21
TabOrder = 1
Text = 'Is there anyone in here?'
end
object Edit4: TEdit
Left = 114
Top = 208
Width = 277
Height = 21
TabOrder = 2
Text = 'Takes two steps backwards then jumps out of the room.'
end
object CheckBox3: TCheckBox
Left = 396
Top = 182
Width = 15
Height = 17
TabOrder = 3
end
object CheckBox4: TCheckBox
Left = 396
Top = 214
Width = 15
Height = 17
TabOrder = 4
end
object CheckBox7: TCheckBox
Left = 2
Top = 238
Width = 255
Height = 17
Caption = 'Command On Enter Room Message (EG /budlist)'
TabOrder = 5
end
object Edit5: TEdit
Left = 262
Top = 234
Width = 149
Height = 21
TabOrder = 6
Text = '/budlist'
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -