?? reportdemo.dfm
字號:
object CReportDemoForm: TCReportDemoForm
Left = 321
Top = 242
BorderStyle = bsDialog
Caption = 'creport4.12 '#31034#20363' ( lzl-self@sohu.com )'
ClientHeight = 429
ClientWidth = 686
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
OnPaint = FormPaint
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 686
Height = 75
Align = alTop
BevelOuter = bvNone
Caption = 'CReport 4.12'#31034#20363
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
object SpeedButton3: TSpeedButton
Left = 453
Top = 47
Width = 105
Height = 24
Caption = #21160#24577#25253#34920#31034#20363
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
OnClick = SpeedButton3Click
end
object CheckBox1: TCheckBox
Left = 44
Top = 15
Width = 138
Height = 17
Caption = #26410#28385#39029#31354#34920#26684#40784
Checked = True
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
State = cbChecked
TabOrder = 0
OnClick = CheckBox1Click
end
object ReportControl1: TReportControl
Left = 595
Top = 34
Width = 41
Height = 30
Visible = False
end
object CheckBox2: TCheckBox
Left = 45
Top = 37
Width = 156
Height = 17
Caption = #39044#35272#20013#35843#29992#27169#26495#31243#24207
Checked = True
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
State = cbChecked
TabOrder = 2
OnClick = CheckBox2Click
end
object CheckBox3: TCheckBox
Left = 46
Top = 57
Width = 259
Height = 17
Caption = #39044#35272#20013#35843#29992#27169#26495#31243#24207#26102#38480#21046#26576#20123#21151#33021
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = CheckBox3Click
end
end
object Panel2: TPanel
Left = 0
Top = 75
Width = 33
Height = 315
Align = alLeft
BevelOuter = bvNone
TabOrder = 1
end
object Panel4: TPanel
Left = 584
Top = 75
Width = 102
Height = 315
Align = alRight
BevelOuter = bvNone
TabOrder = 2
object Button3: TButton
Left = 13
Top = 43
Width = 71
Height = 21
Hint =
'E:\lzl_delphi\vcl\CReport\CReport_D5_D7\demo_d6_7\CReport_demo.e' +
'pt'
Caption = #25171#21360
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = Button3Click
end
object Button4: TButton
Left = 13
Top = 83
Width = 71
Height = 20
Caption = #20851#38381
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = Button4Click
end
object Button5: TButton
Left = 14
Top = 1
Width = 70
Height = 23
Hint =
'E:\lzl_delphi\vcl\CReport\CReport_D5_D7\demo_d6_7\CReport_demo.e' +
'pt'
Caption = #39044#35272
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = Button5Click
end
end
object Panel5: TPanel
Left = 0
Top = 390
Width = 686
Height = 39
Align = alBottom
BevelOuter = bvNone
TabOrder = 3
object Button2: TButton
Left = 32
Top = 8
Width = 193
Height = 25
Caption = #22270#29255#20889#20837'Table2'#34920'Bmp'#23383#27573#20013
TabOrder = 0
OnClick = Button2Click
end
end
object Panel3: TPanel
Left = 33
Top = 75
Width = 551
Height = 315
Align = alClient
BevelOuter = bvNone
Caption = 'Panel3'
TabOrder = 4
object Panel6: TPanel
Left = 0
Top = 0
Width = 551
Height = 240
Align = alClient
BevelOuter = bvNone
Caption = 'Panel6'
TabOrder = 0
object DBGrid1: TDBGrid
Left = 0
Top = 0
Width = 551
Height = 240
Align = alClient
Color = clWhite
DataSource = DataSource1
ImeName = #20116#31508#30011
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'No'
Width = 55
Visible = True
end
item
Expanded = False
FieldName = 'Name'
Width = 243
Visible = True
end
item
Expanded = False
FieldName = 'ZF'
Width = 173
Visible = True
end>
end
end
object Panel7: TPanel
Left = 0
Top = 240
Width = 551
Height = 75
Align = alBottom
BevelOuter = bvNone
Caption = 'Panel7'
TabOrder = 1
object DBGrid2: TDBGrid
Left = 0
Top = 10
Width = 551
Height = 65
Align = alBottom
DataSource = DataSource2
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'No'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'Km'
Visible = True
end
item
Expanded = False
FieldName = 'Fs'
Width = 117
Visible = True
end
item
Expanded = False
FieldName = 'Bmp'
Width = 176
Visible = True
end>
end
end
end
object ReportRunTime2: TReportRunTime
EditEpt = True
CreportButt = True
SetData.Strings = (
'SetDataSet(t1,table1);'
'SetDataSet(t2,table2);')
AddSpace = True
Left = 560
Top = 48
end
object Table1: TTable
TableName = 't1.db'
Left = 72
Top = 136
end
object Table2: TTable
TableName = 'T2.db'
Left = 72
Top = 216
end
object DataSource1: TDataSource
DataSet = Table1
Left = 104
Top = 136
end
object opbm1: TOpenPictureDialog
Filter =
'All (*.jpg;*.jpeg;*.bmp;*.ico)|*.jpg;*.jpeg;*.bmp;*.ico|JPEG Ima' +
'ge File (*.jpg)|*.jpg|JPEG Image File (*.jpeg)|*.jpeg|Bitmaps (*' +
'.bmp)|*.bmp|Icons (*.ico)|*.ico'
Left = 480
Top = 8
end
object ReportRunTime1: TReportRunTime
EditEpt = True
CreportButt = False
OnSetCellFont = ReportRunTime1SetCellFont
SetData.Strings = (
'SetDataSet(t1,table1);'
'SetDataSet(t2,table2);')
AddSpace = True
Left = 448
Top = 8
end
object DataSource2: TDataSource
DataSet = Table2
Left = 144
Top = 224
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -