📄 mainfrm.dfm
字号:
object frmMain: TfrmMain
Left = 277
Top = 170
Width = 610
Height = 415
BorderWidth = 1
Caption = 'JEDI Survey Builder'
Color = clBtnFace
Constraints.MinHeight = 415
Constraints.MinWidth = 610
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Shell Dlg 2'
Font.Style = []
Menu = mmMain
OldCreateOrder = False
Position = poScreenCenter
Scaled = False
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnResize = FormResize
PixelsPerInch = 96
TextHeight = 13
object Splitter1: TSplitter
Left = 170
Top = 32
Width = 5
Height = 316
Cursor = crSizeWE
AutoSnap = False
MinSize = 120
end
object Panel1: TPanel
Left = 0
Top = 32
Width = 170
Height = 316
Align = alLeft
BevelOuter = bvNone
BorderWidth = 2
TabOrder = 0
object tvItems: TJvTreeView
Left = 2
Top = 2
Width = 166
Height = 312
Align = alClient
HideSelection = False
Images = il16
Indent = 19
PopupMenu = popTree
ReadOnly = True
ShowButtons = False
ShowLines = False
ShowRoot = False
TabOrder = 0
OnChange = tvItemsChange
OnChanging = tvItemsChanging
OnCollapsing = tvItemsCollapsing
Items.Data = {
010000001F0000001500000015000000FFFFFFFFFFFFFFFF0000000000000000
06537572766579}
LineColor = 13160660
end
end
object JvStatusBar1: TJvStatusBar
Left = 0
Top = 348
Width = 600
Height = 19
Panels = <
item
Width = 450
end
item
Width = 50
end>
SimplePanel = False
end
object nbDetails: TNotebook
Left = 175
Top = 32
Width = 425
Height = 316
Align = alClient
PageIndex = 1
TabOrder = 1
OnPageChanged = nbDetailsPageChanged
object TPage
Left = 0
Top = 0
Caption = 'GlobalPage'
object Label1: TLabel
Left = 8
Top = 12
Width = 24
Height = 13
Caption = '&Title:'
FocusControl = edTitle
end
object Label2: TLabel
Left = 8
Top = 60
Width = 57
Height = 13
Caption = '&Description:'
FocusControl = reDescription
end
object Label3: TLabel
Left = 8
Top = 108
Width = 53
Height = 13
Anchors = [akLeft, akBottom]
Caption = '&Web Page:'
FocusControl = edHREF
end
object Label4: TLabel
Left = 8
Top = 156
Width = 78
Height = 13
Anchors = [akLeft, akBottom]
Caption = 'Recipient &Name:'
FocusControl = edRecipientName
end
object Label5: TLabel
Left = 8
Top = 204
Width = 79
Height = 13
Anchors = [akLeft, akBottom]
Caption = 'Recipient &E-Mail:'
FocusControl = edRecipientEMail
end
object Label6: TLabel
Left = 8
Top = 252
Width = 68
Height = 13
Anchors = [akLeft, akBottom]
Caption = '&Release Date:'
FocusControl = dtpReleaseDate
end
object lblExpDate: TLabel
Left = 237
Top = 252
Width = 78
Height = 13
Anchors = [akLeft, akBottom]
Caption = 'E&xpiration Date:'
FocusControl = dtpExpirationDate
end
object Label14: TLabel
Left = 342
Top = 12
Width = 15
Height = 13
Anchors = [akTop, akRight]
Caption = '&ID:'
FocusControl = edID
end
object reDescription: TJvRichEdit
Left = 9
Top = 76
Width = 407
Height = 21
Anchors = [akLeft, akTop, akRight, akBottom]
PlainText = True
ScrollBars = ssVertical
TabOrder = 2
Zoom = 100
OnChange = SurveyChanged
end
object edTitle: TEdit
Left = 8
Top = 28
Width = 323
Height = 21
Anchors = [akLeft, akTop, akRight]
TabOrder = 0
OnChange = SurveyChanged
end
object edHREF: TEdit
Left = 8
Top = 124
Width = 409
Height = 21
Anchors = [akLeft, akRight, akBottom]
TabOrder = 3
OnChange = SurveyChanged
end
object edRecipientName: TEdit
Left = 8
Top = 172
Width = 409
Height = 21
Anchors = [akLeft, akRight, akBottom]
TabOrder = 4
OnChange = SurveyChanged
end
object edRecipientEMail: TEdit
Left = 8
Top = 220
Width = 409
Height = 21
Anchors = [akLeft, akRight, akBottom]
TabOrder = 5
OnChange = SurveyChanged
end
object dtpReleaseDate: TJvDateTimePicker
Left = 8
Top = 268
Width = 219
Height = 21
Anchors = [akLeft, akBottom]
CalAlignment = dtaLeft
Date = 37691.8494962616
Time = 37691.8494962616
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 6
OnChange = SurveyChanged
DropDownDate = 37691
NullText = '(none)'
end
object dtpExpirationDate: TJvDateTimePicker
Left = 237
Top = 268
Width = 180
Height = 21
Anchors = [akLeft, akBottom]
CalAlignment = dtaLeft
Date = 37691.8494962616
Time = 37691.8494962616
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 7
OnChange = SurveyChanged
DropDownDate = 37691
NullText = '(none)'
end
object edID: TJvValidateEdit
Left = 342
Top = 28
Width = 73
Height = 21
Anchors = [akTop, akRight]
CheckChars = '01234567890'
CriticalPoints.CheckPoints = cpNone
CriticalPoints.ColorAbove = clBlue
CriticalPoints.ColorBelow = clRed
EditText = '1'
HasMinValue = True
MaxValue = 1
MinValue = 1
PasswordChar = #0
ReadOnly = False
TabOrder = 1
Text = '1'
Value = 1
OnChange = SurveyChanged
end
end
object TPage
Left = 0
Top = 0
Caption = 'ItemEdit'
object Label8: TLabel
Left = 8
Top = 12
Width = 24
Height = 13
Caption = '&Title:'
FocusControl = edItemTitle
end
object Label9: TLabel
Left = 8
Top = 60
Width = 57
Height = 13
Caption = '&Description:'
FocusControl = reItemDescription
end
object Label10: TLabel
Left = 8
Top = 156
Width = 28
Height = 13
Caption = 'T&ype:'
FocusControl = cbItemType
end
object Label11: TLabel
Left = 8
Top = 214
Width = 41
Height = 13
Caption = '&Choices:'
FocusControl = reItemChoices
end
object edItemTitle: TEdit
Left = 8
Top = 28
Width = 409
Height = 21
Anchors = [akLeft, akTop, akRight]
TabOrder = 0
OnChange = SurveyChanged
end
object cbItemType: TJvComboBox
Left = 8
Top = 172
Width = 409
Height = 21
MaxPixel.Font.Charset = DEFAULT_CHARSET
MaxPixel.Font.Color = clWindowText
MaxPixel.Font.Height = -11
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -