?? base_entry_head.dfm
字號:
inherited Frm_Base_Entry_Head: TFrm_Base_Entry_Head
Left = 346
Top = 210
Caption = 'Frm_Base_Entry_Head'
FormStyle = fsMDIChild
Visible = True
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 12
inherited ControlBar: TControlBar
inherited ToolBar: TToolBar
Width = 344
object ToolButton1: TToolButton
Left = 23
Top = 0
Width = 4
Caption = 'ToolButton1'
ImageIndex = 43
Style = tbsSeparator
end
object tlbtn_Copy: TToolButton
Left = 27
Top = 0
Action = Act_Copy
end
object TlBtn_New: TToolButton
Left = 50
Top = 0
Action = Act_New
end
object TlBtn_Modify: TToolButton
Left = 73
Top = 0
Action = Act_Modify
end
object TlBtn_Delete: TToolButton
Left = 96
Top = 0
Action = Act_Delete
end
object ToolButton5: TToolButton
Left = 119
Top = 0
Width = 6
Caption = 'ToolButton5'
ImageIndex = 46
Style = tbsSeparator
end
object TlBtn_Look: TToolButton
Left = 125
Top = 0
Action = Act_Look
end
object TlBtn_Filter: TToolButton
Left = 148
Top = 0
Action = Act_Filter
end
object TlBtn_Locate: TToolButton
Left = 171
Top = 0
Action = Act_Locate
end
object ToolButton3: TToolButton
Left = 194
Top = 0
Width = 6
Caption = 'ToolButton3'
ImageIndex = 11
Style = tbsSeparator
end
object TlBtn_Order: TToolButton
Left = 200
Top = 0
Action = Act_Order
end
object ToolButton2: TToolButton
Left = 223
Top = 0
Action = Act_SetColumn
end
object ToolButton6: TToolButton
Left = 246
Top = 0
Action = Act_Preview
end
object ToolButton7: TToolButton
Left = 269
Top = 0
Action = Act_Print
end
object ToolButton8: TToolButton
Left = 292
Top = 0
Action = Act_Excel
end
object ToolButton9: TToolButton
Left = 315
Top = 0
Width = 6
Caption = 'ToolButton9'
ImageIndex = 49
Style = tbsSeparator
end
object ToolButton4: TToolButton
Left = 321
Top = 0
Action = Act_Quit
end
end
end
inherited Pnl_Head: TPanel
object Lbl_OrderTitle: TLabel
Left = 17
Top = 22
Width = 60
Height = 12
Caption = #25490#24207#26041#24335#65306
Transparent = True
end
object Lbl_ConditionTitle: TLabel
Left = 17
Top = 7
Width = 60
Height = 12
Caption = #36807#28388#26465#20214#65306
Transparent = True
end
object Lbl_Condition: TLabel
Left = 85
Top = 5
Width = 6
Height = 12
Transparent = True
end
object Lbl_Order: TLabel
Left = 85
Top = 20
Width = 6
Height = 12
Transparent = True
end
end
inherited Pnl_Body: TPanel
object DBGridEh: TDBGridEh
Left = 0
Top = 0
Width = 792
Height = 455
Align = alClient
Color = 15727341
Ctl3D = False
DataSource = DataSource
FixedColor = 14673912
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
FooterColor = clWindow
FooterFont.Charset = GB2312_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -12
FooterFont.Name = #23435#20307
FooterFont.Style = []
ImeName = #32043#20809#25340#38899#36755#20837#27861
ParentCtl3D = False
ParentFont = False
PopupMenu = PopuPmenu
ReadOnly = True
RowHeight = 17
TabOrder = 0
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
TitleHeight = 16
VTitleMargin = 3
OnDblClick = DBGridEhDblClick
OnDrawDataCell = DBGridEhDrawDataCell
OnGetCellParams = DBGridEhGetCellParams
end
end
inherited AdoQry_Tmp: TADOQuery
Left = 357
Top = 291
end
inherited ActionList: TActionList
Left = 208
inherited Act_New: TAction
OnExecute = Act_NewExecute
end
inherited Act_Modify: TAction
OnExecute = Act_ModifyExecute
end
inherited Act_Copy: TAction
Enabled = False
Visible = False
end
inherited Act_Delete: TAction
OnExecute = Act_DeleteExecute
end
inherited Act_Filter: TAction
OnExecute = Act_FilterExecute
end
inherited Act_Locate: TAction
OnExecute = Act_LocateExecute
end
inherited Act_Order: TAction
OnExecute = Act_OrderExecute
end
inherited Act_Look: TAction
OnExecute = Act_LookExecute
end
inherited Act_Print: TAction
OnExecute = Act_PrintExecute
end
inherited Act_Preview: TAction
OnExecute = Act_PreviewExecute
end
inherited Act_Excel: TAction
OnExecute = Act_ExcelExecute
end
inherited Act_SetColumn: TAction
OnExecute = Act_SetColumnExecute
end
end
object AdoQry_Head: TADOQuery
ConnectionString = 'FILE Name=Mrpii.udl'
LockType = ltBatchOptimistic
AfterOpen = AdoQueryAfterOpen
EnableBCD = False
Parameters = <>
Left = 248
Top = 289
end
object DataSource: TDataSource
DataSet = AdoQry_Head
Left = 352
Top = 185
end
object PopuPmenu: TPopupMenu
Left = 264
Top = 169
object HideColumn: TMenuItem
Caption = #38544#34255
OnClick = HideColumnClick
end
end
object ExtPrintReport: TExtPrintReport
TopBordermm = 20
BottomBordermm = 20
LeftBordermm = 10
RightBordermm = 10
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -19
TitleFont.Name = #23435#20307
TitleFont.Style = [fsBold]
SubtitleFont.Charset = DEFAULT_CHARSET
SubtitleFont.Color = clWindowText
SubtitleFont.Height = -13
SubtitleFont.Name = #23435#20307
SubtitleFont.Style = [fsBold]
ReportFont.Charset = DEFAULT_CHARSET
ReportFont.Color = clWindowText
ReportFont.Height = -13
ReportFont.Name = #23435#20307
ReportFont.Style = []
FootFont.Charset = DEFAULT_CHARSET
FootFont.Color = clWindowText
FootFont.Height = -13
FootFont.Name = #23435#20307
FootFont.Style = [fsBold]
NeedLine = False
SumPerPage = True
SumTotal = True
PaperSet = [ptA3, ptA4, ptB4, ptB5, ptNarrow, ptWide]
PaperOrientation = poPortrait
ShowPrintRange = True
PaperType = ptA4
HeaderGroups = <>
Headers = <>
Left = 104
Top = 169
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -