📄 frm_sjcx.dfm
字号:
object frm_XJCX: Tfrm_XJCX
Left = 341
Top = 34
Width = 685
Height = 648
BorderIcons = [biSystemMenu, biMinimize]
Caption = #25968#25454#26597#35810
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
OnCreate = FormCreate
OnDestroy = FormDestroy
PixelsPerInch = 96
TextHeight = 13
object GroupBox1: TGroupBox
Left = 8
Top = 8
Width = 161
Height = 175
Caption = #25968#25454#26597#35810#34920
TabOrder = 0
object CKB_Table: TCheckListBox
Left = 8
Top = 16
Width = 145
Height = 153
OnClickCheck = CKB_TableClickCheck
ItemHeight = 13
TabOrder = 0
end
end
object GroupBox2: TGroupBox
Left = 184
Top = 8
Width = 289
Height = 175
Caption = #26174#31034#23383#27573
TabOrder = 1
object ListBox1: TListBox
Left = 8
Top = 24
Width = 105
Height = 145
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
ItemHeight = 13
TabOrder = 0
end
object Button6: TButton
Left = 120
Top = 136
Width = 49
Height = 25
Caption = '<<'
TabOrder = 1
OnClick = Button6Click
end
object Button7: TButton
Left = 120
Top = 104
Width = 49
Height = 25
Caption = '>>'
TabOrder = 2
OnClick = Button7Click
end
object Button4: TButton
Left = 120
Top = 72
Width = 49
Height = 25
Caption = '<'
TabOrder = 3
OnClick = Button4Click
end
object Button5: TButton
Left = 120
Top = 40
Width = 49
Height = 25
Caption = '>'
TabOrder = 4
OnClick = Button5Click
end
object ListBox2: TListBox
Left = 176
Top = 24
Width = 105
Height = 145
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
ItemHeight = 13
TabOrder = 5
end
end
object GroupBox3: TGroupBox
Left = 8
Top = 184
Width = 537
Height = 153
Caption = #26597#35810#26465#20214
TabOrder = 2
object Label1: TLabel
Left = 112
Top = 16
Width = 36
Height = 13
Caption = #26597#35810#34920
end
object Label2: TLabel
Left = 224
Top = 16
Width = 36
Height = 13
Caption = #26816#32034#35789
end
object Label3: TLabel
Left = 408
Top = 16
Width = 36
Height = 13
Caption = #26816#32034#39033
end
object Label4: TLabel
Left = 328
Top = 16
Width = 24
Height = 13
Caption = #20851#31995
end
object CB_Field: TComboBox
Left = 224
Top = 32
Width = 97
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
ItemHeight = 13
TabOrder = 0
OnChange = CB_FieldChange
end
object CB_Relation: TComboBox
Left = 328
Top = 32
Width = 73
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
ItemHeight = 13
TabOrder = 1
OnChange = CB_RelationChange
Items.Strings = (
'')
end
object CB_Value: TComboBox
Left = 408
Top = 32
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
ItemHeight = 13
TabOrder = 2
end
object GroupBox5: TGroupBox
Left = 8
Top = 16
Width = 97
Height = 41
Caption = #26465#20214#20851#31995
TabOrder = 3
object RB1: TRadioButton
Tag = 6
Left = 8
Top = 16
Width = 57
Height = 17
Caption = #24182#19988
TabOrder = 0
OnClick = ConnClick
end
object rb2: TRadioButton
Tag = 7
Left = 56
Top = 16
Width = 33
Height = 17
Caption = #25110
TabOrder = 1
OnClick = ConnClick
end
end
object CB_Table: TComboBox
Left = 112
Top = 32
Width = 105
Height = 21
ItemHeight = 13
TabOrder = 4
OnChange = CB_TableChange
end
object E_Value: TEdit
Left = 408
Top = 32
Width = 121
Height = 21
TabOrder = 5
end
object DPT_Value: TDateTimePicker
Left = 408
Top = 32
Width = 121
Height = 21
Date = 38423.887350231480000000
Time = 38423.887350231480000000
TabOrder = 6
end
object LB_SqlCN: TListBox
Left = 8
Top = 56
Width = 425
Height = 89
ItemHeight = 13
TabOrder = 7
end
object B_CXAdd: TButton
Left = 448
Top = 67
Width = 73
Height = 25
Hint = #22686#21152#19968#26465#26597#35810#35821#21477
Caption = #22686#21152#26465#20214
TabOrder = 8
OnClick = B_CXAddClick
end
object B_CXDel: TButton
Left = 448
Top = 93
Width = 73
Height = 25
Hint = #21024#38500#36873#20013#30340#26597#35810#35821#21477
Caption = #21024#38500#26465#20214
TabOrder = 9
OnClick = B_CXDelClick
end
object B_CXClear: TButton
Left = 448
Top = 120
Width = 73
Height = 25
Hint = #28165#31354#25152#26377#26597#35810#26465#20214
Caption = #28165#31354
TabOrder = 10
OnClick = B_CXClearClick
end
end
object GroupBox10: TGroupBox
Left = 8
Top = 336
Width = 537
Height = 153
Caption = #26597#35810#32467#26524
TabOrder = 3
object DBG_Result: TDBGrid
Left = 0
Top = 16
Width = 529
Height = 129
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnCellClick = DBG_ResultCellClick
end
end
object B_Seach: TButton
Left = 556
Top = 248
Width = 85
Height = 25
Caption = #26597#35810
TabOrder = 4
OnClick = B_SeachClick
end
object Button3: TButton
Left = 556
Top = 344
Width = 85
Height = 25
Caption = #36864#20986
TabOrder = 5
OnClick = Button3Click
end
object B_TJ: TButton
Left = 556
Top = 280
Width = 85
Height = 25
Caption = #32479#35745
TabOrder = 6
OnClick = B_TJClick
end
object B_export: TButton
Left = 556
Top = 312
Width = 85
Height = 25
Caption = #23548#20986
TabOrder = 7
OnClick = B_exportClick
end
object GB_SunInfo: TGroupBox
Left = 550
Top = 504
Width = 115
Height = 105
Caption = #20174#23646#20449#24687#34920
TabOrder = 8
object RadioButton1: TRadioButton
Left = 8
Top = 24
Width = 89
Height = 17
Caption = #32844#21153#20449#24687
TabOrder = 0
OnClick = RadioButton1Click
end
object RadioButton2: TRadioButton
Left = 8
Top = 48
Width = 113
Height = 17
Caption = #23478#24237#25104#21592#20449#24687
TabOrder = 1
OnClick = RadioButton1Click
end
object RadioButton3: TRadioButton
Left = 8
Top = 72
Width = 105
Height = 17
Caption = #37325#22823#20107#39033#20449#24687
TabOrder = 2
OnClick = RadioButton1Click
end
end
object GB_SubInfo: TGroupBox
Left = 7
Top = 488
Width = 538
Height = 121
Caption = #20174#23646#20449#24687#34920
TabOrder = 9
object DBGrid2: TDBGrid
Left = 0
Top = 16
Width = 529
Height = 81
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object Memo2: TMemo
Left = 136
Top = 16
Width = 385
Height = 89
Lines.Strings = (
'Memo2')
TabOrder = 1
Visible = False
end
object StatusBar1: TStatusBar
Left = 2
Top = 100
Width = 534
Height = 19
Panels = <>
end
object ProgressBartoExcel: TProgressBar
Left = -4
Top = 104
Width = 542
Height = 17
TabOrder = 3
end
end
object B_SubInfo: TButton
Left = 552
Top = 456
Width = 105
Height = 25
Caption = #20174#23646#20449#24687#12297#12297
TabOrder = 10
OnClick = B_SubInfoClick
end
object GroupBox4: TGroupBox
Left = 480
Top = 8
Width = 177
Height = 177
Caption = #21333#20301#21015#34920
TabOrder = 11
inline Frame61: TFrame6
Left = 8
Top = 16
Width = 161
Height = 193
TabOrder = 0
inherited TreeView1: TTreeView
Height = 193
Align = alClient
end
end
end
object SaveDialog1: TSaveDialog
DefaultExt = 'xls'
Filter = #23548#20986#20026'Excel'#25991#20214'|*.xls'
Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
Left = 952
Top = 104
end
object SaveDialog2: TSaveDialog
DefaultExt = 'xls'
Filter = #23548#20986#20026'Excel'#25991#20214'|*.xls'
Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
Left = 952
Top = 104
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -