📄 qtfytj.~dfm
字号:
object QtFyTjForm: TQtFyTjForm
Left = 215
Top = 169
BorderStyle = bsDialog
Caption = #32479#35745#25253#34920
ClientHeight = 303
ClientWidth = 600
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poMainFormCenter
Scaled = False
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Lb_ykh: TLabel
Left = 328
Top = 9
Width = 192
Height = 19
Caption = #25151#23627#31199#37329#24773#20917#32479#35745' '
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Panel1: TPanel
Left = 2
Top = 1
Width = 215
Height = 295
BevelOuter = bvLowered
TabOrder = 0
object Button_FW: TButton
Left = 38
Top = 78
Width = 130
Height = 26
Caption = #25151#23627#31199#37329#24773#20917#32479#35745
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = Button_FWClick
end
object Button_Ls: TButton
Left = 38
Top = 163
Width = 130
Height = 26
Caption = #20919#27700#25910#36153#24773#20917#32479#35745
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = Button_LsClick
end
object Button_Rs: TButton
Left = 38
Top = 120
Width = 130
Height = 26
Caption = #28909#27700#25910#36153#24773#20917#32479#35745
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = Button_RsClick
end
object Button_Yd: TButton
Left = 38
Top = 205
Width = 130
Height = 26
Caption = #29992#30005#25910#36153#24773#20917#32479#35745
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = Button_YdClick
end
object GroupBox2: TGroupBox
Left = 4
Top = 4
Width = 207
Height = 62
Caption = #35831#36873#25321#20132#27454#26102#38388#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
TabOrder = 4
object Dt_begin: TDateTimePicker
Left = 3
Top = 27
Width = 99
Height = 22
CalAlignment = dtaLeft
Date = 38147.5955337037
Time = 38147.5955337037
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 0
end
object Dt_end: TDateTimePicker
Left = 106
Top = 27
Width = 98
Height = 22
CalAlignment = dtaLeft
Date = 38147.5956137963
Time = 38147.5956137963
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 1
end
end
object GroupBox3: TGroupBox
Left = 3
Top = 237
Width = 205
Height = 53
TabOrder = 5
object BBtn_Print: TBitBtn
Left = 12
Top = 16
Width = 80
Height = 25
Caption = '&P'#25171#21360
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = BBtn_PrintClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
33333337FFFF7733333333300000033333333337777773333333}
NumGlyphs = 2
end
object bitbtn_quit: TBitBtn
Left = 112
Top = 16
Width = 80
Height = 25
Caption = #36864#20986
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = bitbtn_quitClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
0333337F777FFFFF7F3333000000000003333377777777777333}
NumGlyphs = 2
end
end
end
object GroupBox1: TGroupBox
Left = 220
Top = 32
Width = 375
Height = 264
TabOrder = 1
object DBGrid_Zjtj: TDBGrid
Left = 2
Top = 15
Width = 371
Height = 247
Align = alClient
DataSource = DS_Zjtj
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Alignment = taCenter
Expanded = False
FieldName = 'rs'
Title.Alignment = taCenter
Title.Caption = #20132#27454#25151#21495#25968
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = #23435#20307
Title.Font.Style = []
Width = 74
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'fangya'
Title.Alignment = taCenter
Title.Caption = #25151#25276
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = #23435#20307
Title.Font.Style = []
Width = 50
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'fangprice'
Title.Alignment = taCenter
Title.Caption = #25151#31199
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = #23435#20307
Title.Font.Style = []
Width = 51
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'ljf'
Title.Alignment = taCenter
Title.Caption = #28165#27905#36153
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = #23435#20307
Title.Font.Style = []
Width = 46
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'yf'
Title.Alignment = taCenter
Title.Caption = #24212#20184#37329
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = #23435#20307
Title.Font.Style = []
Width = 61
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'sf'
Title.Alignment = taCenter
Title.Caption = #23454#20184#37329
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = #23435#20307
Title.Font.Style = []
Visible = True
end>
end
object DBGrid1: TDBGrid
Left = 2
Top = 17
Width = 371
Height = 247
DataSource = DS_Zjtj
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Visible = False
Columns = <
item
Alignment = taCenter
Expanded = False
FieldName = 'rs'
Title.Alignment = taCenter
Title.Caption = #20132#27454#25151#21495#25968
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = #23435#20307
Title.Font.Style = []
Width = 81
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'sys'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
Title.Alignment = taCenter
Title.Caption = #23454#29992#25968
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = #23435#20307
Title.Font.Style = []
Width = 59
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'yfj'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
Title.Alignment = taCenter
Title.Caption = #24212#20184#37329
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = #23435#20307
Title.Font.Style = []
Width = 77
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'sfj'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
Title.Alignment = taCenter
Title.Caption = #23454#20184#37329
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = #23435#20307
Title.Font.Style = []
Visible = True
end>
end
end
object ADQ_Zjtj: TADOQuery
Connection = DB_module.ADOCon
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select count(*)as rs,sum(sys)as sys,sum(yfj)as yfj,sum(sfj)as sf' +
'j from dbo.Zf_Reshui')
Left = 552
end
object DS_Zjtj: TDataSource
DataSet = ADQ_Zjtj
Left = 592
Top = 8
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -