📄 statunit.dfm
字号:
ADFFA5A6ADFF949E8CFF8C9A84FF737573FF6B618CFF6B5DB5FF6B69EFFF7B79
FFFF7369FFFF7369FFFF7369FFFF7369FFFF528E8CFF4AE35AFF4AD763FF4ACF
63FF4AC75AFF7B9E7BFF00000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000BDBEC6FFA59E9CFF8475
94FF6B61A5FF6359CEFF6361FFFF6361FFFF84758CFFB5B2B5FFBDBABDFFBDBE
C6FFC6CBCEFF0000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000B5BABDFF8C9694FF84758CFFBDC3C6FF00000000000000000000
0000000000000000000000000000000000000000000000000000}
NumGlyphs = 1
ParentColor = False
ShadowColor = clGray
Style = bsModern
OnClick = LbSpeedButton1Click
end
end
end
object DBGridEh1: TDBGridEh
Left = 0
Top = 73
Width = 852
Height = 303
Align = alClient
DataSource = DataSource1
Flat = False
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
FooterColor = clSkyBlue
FooterFont.Charset = ANSI_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -13
FooterFont.Name = #23435#20307
FooterFont.Style = []
FrozenCols = 3
OddRowColor = clSkyBlue
OptionsEh = [dghFixed3D, dghFrozen3D, dghHighlightFocus, dghClearSelection, dghDialogFind]
ParentFont = False
SumList.Active = True
TabOrder = 1
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
EditButtons = <>
FieldName = #21512#21516#21495
Footers = <>
end
item
AutoFitColWidth = False
EditButtons = <>
FieldName = #20080#21463#20154
Footer.Value = #21512#35745#65306
Footers = <>
Width = 117
end
item
AutoFitColWidth = False
EditButtons = <>
FieldName = #39033#30446#21517#31216
Footers = <>
Width = 113
end
item
AutoFitColWidth = False
EditButtons = <>
FieldName = #24162#24231
Footers = <>
Width = 93
end
item
AutoFitColWidth = False
EditButtons = <>
FieldName = #25151#21495
Footers = <>
Width = 86
end
item
EditButtons = <>
FieldName = #24314#31569#38754#31215
Footer.FieldName = #24314#31569#38754#31215
Footers = <>
Width = 87
end
item
AutoFitColWidth = False
EditButtons = <>
FieldName = #22871#20869#38754#31215
Footer.FieldName = #22871#20869#38754#31215
Footers = <>
Width = 77
end
item
AutoFitColWidth = False
EditButtons = <>
FieldName = #20998#25674#38754#31215
Footer.FieldName = #20998#25674#38754#31215
Footers = <>
Width = 88
end
item
AutoFitColWidth = False
EditButtons = <>
FieldName = #35745#20215#26041#24335
Footers = <>
end
item
AutoFitColWidth = False
EditButtons = <>
FieldName = #38144#21806#24635#20215
Footers = <>
Width = 81
end>
end
object Panel1: TPanel
Left = 0
Top = 376
Width = 852
Height = 65
Align = alBottom
TabOrder = 2
object StaticText1: TStaticText
Left = 8
Top = 8
Width = 69
Height = 17
Caption = #27719#24635#32467#26524#65306
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
end
object StaticText2: TStaticText
Left = 80
Top = 8
Width = 69
Height = 17
Caption = #24314#31569#38754#31215#65306
TabOrder = 1
end
object StaticText3: TStaticText
Left = 80
Top = 40
Width = 69
Height = 17
Caption = #20998#25674#38754#31215#65306
TabOrder = 2
end
object StaticText4: TStaticText
Left = 80
Top = 24
Width = 69
Height = 17
Caption = #22871#38754#38754#31215#65306
TabOrder = 3
end
object StaticText5: TStaticText
Left = 152
Top = 8
Width = 50
Height = 17
Caption = '0'#24179#26041#31859
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 4
end
object StaticText6: TStaticText
Left = 152
Top = 24
Width = 50
Height = 17
Caption = '0'#24179#26041#31859
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 5
end
object StaticText7: TStaticText
Left = 152
Top = 40
Width = 50
Height = 17
Caption = '0'#24179#26041#31859
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 6
end
object StaticText8: TStaticText
Left = 288
Top = 8
Width = 69
Height = 17
Caption = #38144#21806#24635#20215#65306
TabOrder = 7
end
object StaticText9: TStaticText
Left = 352
Top = 8
Width = 24
Height = 17
Caption = '0'#20803
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 8
end
object StaticText10: TStaticText
Left = 288
Top = 40
Width = 11
Height = 17
Caption = ' '
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 9
end
end
object ADOQuery1: TADOQuery
Connection = DataModule2.ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select t0.'#21512#21516#32534#21495' AS '#21512#21516#21495',t0.'#20080#21463#20154' AS '#20080#21463#20154',t1.'#39033#30446#24314#35774#20381#25454#21830#21697#25151#21517#31216' as '#39033#30446#21517#31216','
' t3.'#21830#21697#25151#22522#26412#24773#20917#24162#24231' as '#24162#24231','
' t3.'#21830#21697#25151#22522#26412#24773#20917#25151#21495' AS '#25151#21495',t3.'#21830#21697#25151#22522#26412#24773#20917#24314#31569#38754#31215' as '#24314#31569#38754#31215','
' t3.'#21830#21697#25151#22522#26412#24773#20917#22871#20869#38754#31215' as '#22871#20869#38754#31215',t3.'#21830#21697#25151#22522#26412#24773#20917#20998#25674#38754#31215' as '#20998#25674#38754#31215','
' T4.'#35745#20215#26041#24335',t4.'#24635#20215' as '#38144#21806#24635#20215',t4.'#35745#20215#26041#24335#31181#31867' '
' FROM T0,T1,T3,t4 WHERE T0.'#21512#21516#32534#21495'=T1.'#21512#21516#32534#21495' AND '
' T0.'#21512#21516#32534#21495'=T3.'#21512#21516#32534#21495' AND T0.'#21512#21516#32534#21495'=T4.'#21512#21516#32534#21495' AND T0.'#21512#21516#32534#21495'<>'#39'MD200' +
'5'#39)
Left = 24
Top = 313
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 56
Top = 313
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -