📄 clyjccx.dfm
字号:
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 13
ParentFont = False
TabOrder = 4
Items.Strings = (
''
#19978#26376#25968#37327
#19978#26376#37329#39069
#36827#20179#25968#37327
#36827#20179#37329#39069
#20986#20179#25968#37327
#20986#20179#37329#39069
#26412#26376#25968#37327
#26412#26376#37329#39069)
end
object dblkbox: TDBLookupComboboxEh
Left = 220
Top = 15
Width = 99
Height = 21
Enabled = False
EditButtons = <>
KeyField = #31867#22411'ID'
ListField = #31867#22411#21517#31216
ListSource = dm.whcllxdmds
ParentShowHint = False
ShowHint = False
TabOrder = 5
Visible = True
OnKeyDown = dblkboxKeyDown
end
object CheckBox1: TCheckBox
Left = 265
Top = 51
Width = 72
Height = 17
Caption = #33258#21160#21015#23485
TabOrder = 6
OnClick = CheckBox1Click
end
object CheckBox2: TCheckBox
Left = 170
Top = 17
Width = 50
Height = 17
Caption = #31867#22411
TabOrder = 7
OnClick = CheckBox2Click
end
end
object GroupBox2: TGroupBox
Left = 0
Top = 0
Width = 228
Height = 80
Align = alLeft
Caption = #36873#25321#24180#26376
TabOrder = 1
object Label3: TLabel
Left = 10
Top = 20
Width = 20
Height = 13
Caption = #24180':'
end
object jzts: TLabel
Left = 9
Top = 52
Width = 169
Height = 13
Caption = #24403#24180#25968#25454#26410#32467#36716#65292#21487#37325#26032#25972#29702
end
object Label5: TLabel
Left = 94
Top = 19
Width = 20
Height = 13
Caption = #26376':'
end
object nf_spe: TSpinEdit
Left = 31
Top = 16
Width = 56
Height = 22
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
MaxValue = 0
MinValue = 0
ParentFont = False
TabOrder = 0
Value = 0
OnChange = nf_speChange
end
object BitBtn1: TBitBtn
Left = 163
Top = 13
Width = 59
Height = 25
Caption = #25972#29702
TabOrder = 1
OnClick = BitBtn1Click
end
object yf_spe: TSpinEdit
Left = 114
Top = 16
Width = 38
Height = 22
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
MaxValue = 12
MinValue = 1
ParentFont = False
TabOrder = 2
Value = 1
OnChange = nf_speChange
end
end
end
object SaveDialog1: TSaveDialog
Filter =
'Microsoft Excel Workbook (*.xls)|*.XLS|Comma separated values (*' +
'.csv)|*.CSV|HTML file (*.htm)|*.HTM|Rich Text Format (*.rtf)|*.R' +
'TF|Text files (*.txt)|*.TXT'
InitialDir = 'd:'
Left = 234
Top = 198
end
object MYPDBGEh: TPrintDBGridEh
Options = [pghFitGridToPageWidth, pghRowAutoStretch]
Page.BottomMargin = 2
Page.LeftMargin = 2
Page.RightMargin = 2
Page.TopMargin = 2
PageFooter.CenterText.Strings = (
' '#31532' &[Page] '#39029' ')
PageFooter.Font.Charset = DEFAULT_CHARSET
PageFooter.Font.Color = clWindowText
PageFooter.Font.Height = -13
PageFooter.Font.Name = 'MS Sans Serif'
PageFooter.Font.Style = []
PageFooter.LeftText.Strings = (
'')
PageHeader.Font.Charset = DEFAULT_CHARSET
PageHeader.Font.Color = clWindowText
PageHeader.Font.Height = -24
PageHeader.Font.Name = 'MS Sans Serif'
PageHeader.Font.Style = []
PrintFontName = #23435#20307
Units = MM
Left = 303
Top = 196
BeforeGridText_Data = {
7B5C727466315C616E73695C616E73696370673933365C64656666305C646566
6C616E67313033335C6465666C616E676665323035327B5C666F6E7474626C7B
5C66305C666E696C5C6663686172736574313334205C2763625C2763655C2763
635C2765353B7D7D0D0A5C766965776B696E64345C7563315C706172645C7163
5C6C616E67323035325C66305C6673343020255B62745D202020202020202020
2020202020202020202020202020202020202020202020202020202020202020
202020200D0A5C706172205C667332345C2762345C2766325C2764335C276131
5C2763385C2764355C2763365C2764615C6C616E6731303333203A5C6C616E67
32303532202020255B546F6461795D2020200D0A5C706172205C706172642025
5B746A5D2020200D0A5C706172207D0D0A00}
AfterGridText_Data = {
7B5C727466315C616E73695C616E73696370673933365C64656666305C646566
6C616E67313033335C6465666C616E676665323035327B5C666F6E7474626C7B
5C66305C666E696C5C6663686172736574313334204D532053616E7320536572
69663B7D7D0D0A5C766965776B696E64345C7563315C706172645C71635C6C61
6E67323035325C66305C667332345C2764365C2763365C2762315C2765645C27
63385C2763625C2761335C276261202020202020202020202020202020202020
2020202020202020202020202020202020202020202020202020202020202020
5C2763395C2766335C2762615C2763625C66733136200D0A5C706172207D0D0A
00}
end
object PopupMenu1: TPopupMenu
Left = 369
Top = 193
object N2: TMenuItem
Action = FontEdit1
Caption = #23383#20307#35774#32622
end
object N5: TMenuItem
Caption = '-'
end
object N6: TMenuItem
Action = FilePrintSetup1
Caption = #25171#21360#35774#32622
end
object PrintSetup1: TMenuItem
Action = PrintDlg1
Caption = #25171#21360
end
object N1: TMenuItem
Caption = #25171#21360#39044#35272
OnClick = N1Click
end
object N3: TMenuItem
Caption = '-'
end
object N4: TMenuItem
Caption = #23548#20986#25968#25454
OnClick = N4Click
end
object N7: TMenuItem
Caption = '-'
end
object N8: TMenuItem
Caption = #38544#34255#21015
OnClick = N8Click
end
object N9: TMenuItem
Caption = #21462#28040#38544#34255
OnClick = N9Click
end
end
object ActionManager1: TActionManager
ActionBars = <
item
end>
Left = 192
Top = 197
object EditCut1: TEditCut
Category = 'Edit'
Caption = 'Cu&t'
Hint = #21098#20999
ImageIndex = 0
ShortCut = 16472
end
object EditCopy1: TEditCopy
Category = 'Edit'
Caption = '&Copy'
Hint = #22797#21046
ImageIndex = 1
ShortCut = 16451
end
object EditPaste1: TEditPaste
Category = 'Edit'
Caption = '&Paste'
Hint = #31896#36148
ImageIndex = 2
ShortCut = 16470
end
object EditDelete1: TEditDelete
Category = 'Edit'
Caption = '&Delete'
Hint = 'Delete|Erases the selection'
ImageIndex = 5
ShortCut = 46
end
object FilePrintSetup1: TFilePrintSetup
Category = 'File'
Caption = 'Print Set&up...'
Hint = 'Print Setup'
ImageIndex = 19
end
object FontEdit1: TFontEdit
Category = 'Dialog'
Caption = 'Select &Font...'
Dialog.Font.Charset = DEFAULT_CHARSET
Dialog.Font.Color = clWindowText
Dialog.Font.Height = -11
Dialog.Font.Name = 'MS Sans Serif'
Dialog.Font.Style = []
Dialog.MinFontSize = 0
Dialog.MaxFontSize = 0
Hint = #23383#20307
ImageIndex = 21
OnAccept = FontEdit1Accept
end
object ColorSelect1: TColorSelect
Category = 'Dialog'
Caption = 'Select &Color...'
Dialog.Ctl3D = True
Hint = #39068#33394
ImageIndex = 22
end
object PrintDlg1: TPrintDlg
Category = 'Dialog'
Caption = '&Print...'
ImageIndex = 20
ShortCut = 16464
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -