?? usyslog.dfm
字號:
inherited frmsyslog: Tfrmsyslog
Left = 251
Top = 140
Width = 568
Height = 350
ActiveControl = Grid
Caption = #31995#32479#26085#24535
Font.Charset = ANSI_CHARSET
Font.Height = -12
Font.Name = #23435#20307
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object CoolBar1: TCoolBar
Left = 0
Top = 289
Width = 560
Height = 34
Align = alBottom
Bands = <
item
Control = Panel1
ImageIndex = -1
MinHeight = 30
Width = 556
end>
object Panel1: TPanel
Left = 9
Top = 0
Width = 543
Height = 30
Align = alClient
BevelOuter = bvNone
TabOrder = 0
object spbtnEdit: TSpeedButton
Left = 4
Top = 5
Width = 60
Height = 20
Caption = #32534#36753
Flat = True
Glyph.Data = {
D6000000424DD60000000000000076000000280000000B0000000C0000000100
04000000000060000000C40E0000C40E00001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888880
0000888888888880000088800000888000008888888888800000888880888880
0000888800088880000088700000888000008800000008800000888800088880
0000888800088880000088880008888000008888888888800000}
Layout = blGlyphRight
OnClick = spbtnEditClick
end
object paprint: TPanel
Left = 403
Top = 0
Width = 140
Height = 30
Align = alRight
BevelOuter = bvNone
TabOrder = 0
object Label1: TLabel
Left = 8
Top = 8
Width = 37
Height = 17
AutoSize = False
Caption = #25171#21360#65306
end
object comboPrint: TwwDBLookupCombo
Left = 45
Top = 5
Width = 89
Height = 20
DropDownAlignment = taLeftJustify
Selected.Strings = (
#25171#21360#36873#39033#9'8'#9#25171#21360#36873#39033#9#9)
LookupTable = CDSprint
LookupField = #25171#21360#36873#39033
Options = [loColLines, loRowLines, loTitles, loFixedDropDownHeight, loSearchOnBackspace]
TabOrder = 0
AutoDropDown = False
ShowButton = True
PreciseEditRegion = False
AllowClearKey = False
OnChange = comboPrintChange
end
end
end
end
object Grid: TDBGridEh
Left = 0
Top = 0
Width = 560
Height = 289
Align = alClient
Ctl3D = True
DataSource = DSbaseinfo
FixedColor = 12835543
Flat = True
FooterColor = clWindow
FooterFont.Charset = ANSI_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -12
FooterFont.Name = #23435#20307
FooterFont.Style = []
ParentCtl3D = False
ReadOnly = True
TabOrder = 1
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
TitleLines = 2
OnGetCellParams = GridGetCellParams
Columns = <
item
EditButtons = <>
FieldName = 'fid'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #24207#21495
Title.Hint = #24207#21495
end
item
EditButtons = <>
FieldName = 'ftype'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #31867#22411
Title.Hint = #31867#22411
end
item
EditButtons = <>
FieldName = 'ftime'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #26085#26399
Title.Hint = #26085#26399
Width = 150
end
item
EditButtons = <>
FieldName = 'fform'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #26469#28304
Title.Hint = #26469#28304
Width = 130
end
item
EditButtons = <>
FieldName = 'fevent'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #20998#31867
Title.Hint = #20998#31867
Width = 250
end
item
EditButtons = <>
FieldName = 'fuser'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #29992#25143
Title.Hint = #29992#25143
Width = 120
end
item
EditButtons = <>
FieldName = 'fpcname'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #30005#33041
Title.Hint = #30005#33041
Width = 150
end>
end
object CDSprint: TClientDataSet
Aggregates = <>
Params = <>
Left = 436
Top = 260
object CDSprintField: TStringField
DisplayWidth = 8
FieldName = #25171#21360#36873#39033
Size = 8
end
end
object ActionList1: TActionList
Left = 24
Top = 254
object s01: TAction
Caption = #28165#38500
Hint = #28165#38500
ShortCut = 16449
OnExecute = s01Execute
end
object s02: TAction
Caption = #26597#25214
Hint = #26597#25214
ShortCut = 16451
OnExecute = s02Execute
end
object s03: TAction
Caption = #21047#26032
Hint = #21047#26032
ShortCut = 16453
OnExecute = s03Execute
end
end
object PopupMenu: TPopupMenu
AutoHotkeys = maManual
Left = 56
Top = 256
object N1: TMenuItem
Action = s01
end
object N5: TMenuItem
Caption = '-'
end
object N2: TMenuItem
Action = s02
end
object N4: TMenuItem
Caption = '-'
end
object N3: TMenuItem
Action = s03
end
end
object CDSbaseinfo: TClientDataSet
Aggregates = <>
Params = <>
Left = 56
Top = 64
object CDSbaseinfofid: TAutoIncField
FieldName = 'fid'
ReadOnly = True
end
object CDSbaseinfoftype: TWideStringField
FieldName = 'ftype'
Size = 8
end
object CDSbaseinfoftime: TDateTimeField
FieldName = 'ftime'
end
object CDSbaseinfofform: TWideStringField
FieldName = 'fform'
Size = 30
end
object CDSbaseinfofevent: TWideStringField
FieldName = 'fevent'
Size = 80
end
object CDSbaseinfofuser: TWideStringField
FieldName = 'fuser'
end
object CDSbaseinfofpcname: TWideStringField
FieldName = 'fpcname'
Size = 30
end
end
object DSbaseinfo: TDataSource
DataSet = CDSbaseinfo
Left = 24
Top = 64
end
object frBaseinfo: TfrReport
Dataset = frDBDSbaseinfo
InitialZoom = pzDefault
MDIPreview = True
ModalPreview = False
ModifyPrepared = False
PreviewButtons = [pbZoom, pbPrint, pbExit]
RebuildPrinter = False
Left = 448
Top = 216
ReportForm = {19000000}
end
object frDBDSbaseinfo: TfrDBDataSet
DataSet = CDSbaseinfo
Left = 480
Top = 216
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -