?? bmlyhz.dfm
字號:
item
EditButtons = <>
FieldName = #37096#38376'id'
Footers = <>
Width = 63
end
item
EditButtons = <>
FieldName = #37096#38376#21517#31216
Footers = <>
Width = 122
end
item
EditButtons = <>
FieldName = #26448#26009#32534#30721
Footers = <>
end
item
EditButtons = <>
FieldName = #26448#26009#21517#31216
Footer.Value = #21512#35745
Footer.ValueType = fvtStaticText
Footers = <>
Width = 135
end
item
EditButtons = <>
FieldName = #21333#20301
Footers = <>
Width = 37
end
item
EditButtons = <>
FieldName = #25968#37327
Footer.ValueType = fvtSum
Footers = <>
Width = 72
end
item
EditButtons = <>
FieldName = #22343#20215
Footers = <>
Width = 72
end
item
EditButtons = <>
FieldName = #37329#39069
Footer.ValueType = fvtSum
Footers = <>
Width = 73
end>
end
end
object TabSheet2: TTabSheet
Caption = #39046#29992#26126#32454
ImageIndex = 1
OnShow = TabSheet2Show
object DBGridEh2: TDBGridEh
Left = 0
Top = 0
Width = 702
Height = 305
Align = alClient
DataSource = dm.cxds_bmlymx
Flat = True
FooterColor = 16439211
FooterFont.Charset = ANSI_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -13
FooterFont.Name = #23435#20307
FooterFont.Style = []
FooterRowCount = 1
FrozenCols = 4
PopupMenu = PopupMenu1
ReadOnly = True
SumList.Active = True
TabOrder = 0
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
UseMultiTitle = True
Columns = <
item
EditButtons = <>
FieldName = #26085#26399
Footers = <>
Width = 75
end
item
EditButtons = <>
FieldName = #36827#20179#21333#21495
Footers = <>
Width = 93
end
item
EditButtons = <>
FieldName = #26448#26009#32534#30721
Footer.FieldName = #37096#38376#21517#31216
Footer.ValueType = fvtFieldValue
Footers = <>
end
item
EditButtons = <>
FieldName = #26448#26009#21517#31216
Footer.Value = #21512#35745
Footer.ValueType = fvtStaticText
Footers = <>
Width = 135
end
item
EditButtons = <>
FieldName = #21333#20301
Footers = <>
Width = 39
end
item
EditButtons = <>
FieldName = #25968#37327
Footer.ValueType = fvtSum
Footers = <>
Width = 72
end
item
EditButtons = <>
FieldName = #21333#20215
Footers = <>
Width = 72
end
item
EditButtons = <>
FieldName = #37329#39069
Footer.ValueType = fvtSum
Footers = <>
Width = 73
end
item
EditButtons = <>
FieldName = #20986#20179#31867#22411
Footers = <>
Width = 76
end
item
EditButtons = <>
FieldName = #39046#29992#20154
Footers = <>
Width = 57
end>
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 = 233
Top = 197
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 = 277
Top = 198
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 = 321
Top = 198
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 + -