📄 rl_lssj_unit.~dfm
字号:
object rl_lssj: Trl_lssj
Left = 255
Top = 103
Width = 696
Height = 539
Caption = #21382#21490#25968#25454#20998#26512
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Splitter1: TSplitter
Left = 0
Top = 153
Width = 688
Height = 2
Cursor = crVSplit
Align = alTop
end
object Splitter2: TSplitter
Left = 0
Top = 481
Width = 688
Height = 2
Cursor = crVSplit
Align = alBottom
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 688
Height = 153
Align = alTop
TabOrder = 0
object Label1: TLabel
Left = 8
Top = 16
Width = 60
Height = 13
AutoSize = False
Caption = #21333#20301#31867#21035
end
object Label2: TLabel
Left = 8
Top = 56
Width = 89
Height = 13
AutoSize = False
Caption = #20998#21378#65288#23376#20844#21496#65289
end
object Label3: TLabel
Left = 8
Top = 96
Width = 81
Height = 13
AutoSize = False
Caption = #31185#23460#65288#29677#32452#65289
end
object Label4: TLabel
Left = 8
Top = 128
Width = 81
Height = 13
AutoSize = False
Caption = #35745#31639#39033#30446
end
object Label5: TLabel
Left = 312
Top = 8
Width = 73
Height = 13
AutoSize = False
Caption = #36215#22987#26085#26399
end
object Label6: TLabel
Left = 312
Top = 48
Width = 65
Height = 13
AutoSize = False
Caption = #32456#27490#26085#26399
end
object Label7: TLabel
Left = 64
Top = 16
Width = 9
Height = 16
Caption = '*'
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object cb_dw: TComboBox
Left = 104
Top = 8
Width = 185
Height = 21
ItemHeight = 13
TabOrder = 0
OnChange = cb_dwChange
end
object cb_fc: TComboBox
Left = 104
Top = 48
Width = 185
Height = 21
ItemHeight = 13
TabOrder = 1
OnChange = cb_fcChange
end
object cb_bz: TComboBox
Left = 104
Top = 88
Width = 185
Height = 21
ItemHeight = 13
TabOrder = 2
end
object cb_jsxm: TComboBox
Left = 104
Top = 120
Width = 185
Height = 21
ItemHeight = 13
TabOrder = 3
OnChange = cb_jsxmChange
end
object Button1: TButton
Left = 488
Top = 24
Width = 75
Height = 25
Caption = #26597#35810
Enabled = False
TabOrder = 4
OnClick = Button1Click
end
object Button2: TButton
Left = 488
Top = 56
Width = 75
Height = 25
Caption = #35745#31639
Enabled = False
TabOrder = 5
OnClick = Button2Click
end
object dateedit1: TRzDateTimeEdit
Left = 432
Top = 24
Width = 20
Height = 21
CalendarElements = [ceYear, ceMonth, ceArrows, ceDaysOfWeek, ceFillDays, ceTodayButton]
CaptionTodayBtn = #23601#36873#20170#22825#21543#65281
EditType = etDate
Format = 'yyyymmdd'
TabOrder = 6
OnChange = dateedit1Change
end
object dateedit2: TRzDateTimeEdit
Left = 430
Top = 63
Width = 20
Height = 21
CalendarElements = [ceYear, ceMonth, ceArrows, ceDaysOfWeek, ceFillDays, ceTodayButton]
CaptionTodayBtn = #23601#36873#20170#22825#21543#65281
EditType = etDate
Format = 'yyyymmdd'
TabOrder = 7
OnChange = dateedit2Change
end
object edt_rq1: TEdit
Left = 312
Top = 24
Width = 121
Height = 21
TabOrder = 8
end
object edt_rq2: TEdit
Left = 312
Top = 64
Width = 121
Height = 21
TabOrder = 9
end
object Button3: TButton
Left = 488
Top = 88
Width = 75
Height = 25
Caption = #25171#21360
TabOrder = 10
OnClick = Button3Click
end
object Button4: TButton
Left = 488
Top = 120
Width = 75
Height = 25
Caption = #36820#22238
TabOrder = 11
OnClick = Button4Click
end
end
object Panel2: TPanel
Left = 0
Top = 155
Width = 688
Height = 326
Align = alClient
Caption = 'Panel2'
TabOrder = 1
object DBGridEh1: TDBGridEh
Left = 1
Top = 1
Width = 686
Height = 324
Align = alClient
DataSource = DataSource1
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
FooterColor = clYellow
FooterFont.Charset = GB2312_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -13
FooterFont.Name = #23435#20307
FooterFont.Style = []
FooterRowCount = 1
OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection]
ParentFont = False
SumList.Active = True
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
UseMultiTitle = True
Columns = <
item
EditButtons = <>
FieldName = 'A1'
Footers = <>
Title.Caption = #32844#24037#32534#21495
end
item
EditButtons = <>
FieldName = 'A5'
Footer.Value = #21512#35745#65306
Footer.ValueType = fvtStaticText
Footers = <>
Title.Caption = #32844#24037#22995#21517
end
item
EditButtons = <>
FieldName = 'A150'
Footer.FieldName = 'A150'
Footer.ValueType = fvtSum
Footers = <>
Title.Caption = #26597#35810#25968#25454
end>
end
end
object StatusBar1: TStatusBar
Left = 0
Top = 493
Width = 688
Height = 19
Panels = <>
end
object Panel3: TPanel
Left = 0
Top = 483
Width = 688
Height = 10
Align = alBottom
TabOrder = 3
Visible = False
object pb1: TProgressBar
Left = 1
Top = 1
Width = 686
Height = 8
Align = alClient
TabOrder = 0
end
end
object DataSource1: TDataSource
DataSet = Q_cx
Left = 112
Top = 172
end
object Q_cx: TQuery
DatabaseName = 'gz'
RequestLive = True
SQL.Strings = (
'select * from gzzk')
Left = 32
Top = 196
end
object tb_dw: TTable
DatabaseName = 'gz'
TableName = 'rl_dw.db'
Left = 56
Top = 32
end
object tb_bm: TTable
DatabaseName = 'gz'
TableName = 'rlbm.DB'
Left = 104
Top = 24
end
object tb_bz: TTable
DatabaseName = 'gz'
TableName = 'rlbz.DB'
Left = 152
Top = 24
end
object tb_jsxm: TTable
DatabaseName = 'gz'
TableName = 'gzls.DB'
Left = 80
Top = 120
end
object q_js: TQuery
DatabaseName = 'gz'
Left = 360
Top = 216
end
object prt: TPrintDBGridEh
DBGridEh = DBGridEh1
Options = []
Page.BottomMargin = 2.000000000000000000
Page.LeftMargin = 2.000000000000000000
Page.RightMargin = 2.000000000000000000
Page.TopMargin = 2.000000000000000000
PageFooter.Font.Charset = DEFAULT_CHARSET
PageFooter.Font.Color = clWindowText
PageFooter.Font.Height = -11
PageFooter.Font.Name = 'MS Sans Serif'
PageFooter.Font.Style = []
PageHeader.CenterText.Strings = (
#21382#21490#25968#25454#20998#26512)
PageHeader.Font.Charset = GB2312_CHARSET
PageHeader.Font.Color = clRed
PageHeader.Font.Height = -21
PageHeader.Font.Name = #21326#25991#34892#26999
PageHeader.Font.Style = []
Units = MM
Left = 256
Top = 204
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -