?? ydyhbgcx.dfm
字號:
object Fyhbgcx: TFyhbgcx
Left = 121
Top = 99
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = '用戶變更查詢'
ClientHeight = 348
ClientWidth = 558
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋體'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object SpeedButton1: TSpeedButton
Left = 394
Top = 8
Width = 49
Height = 41
Caption = '查詢'
Flat = True
Glyph.Data = {
EE000000424DEE000000000000007600000028000000100000000F0000000100
04000000000078000000130B0000130B00001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
888800000888880000080F000888880F00080F000888880F0008000000080000
000800F000000F00000800F000800F00000800F000800F000008800000000000
0088880F00080F000888880000080000088888800088800088888880F08880F0
888888800088800088888888888888888888}
Layout = blGlyphTop
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 448
Top = 8
Width = 49
Height = 41
Caption = '打印'
Flat = True
Glyph.Data = {
EE000000424DEE000000000000007600000028000000100000000F0000000100
0400000000007800000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FF0000000000
0FFFF0888888888080FF000000000000080F0888888FFF88000F088888877788
080F00000000000008800888888888808080F000000000080800FF0FFFFFFFF0
8080FFF0F00000F0000FFFF0FFFFFFFF0FFFFFFF0F00000F0FFFFFFF0FFFFFFF
F0FFFFFFF000000000FFFFFFFFFFFFFFFFFF}
Layout = blGlyphTop
OnClick = SpeedButton2Click
end
object SpeedButton3: TSpeedButton
Left = 502
Top = 8
Width = 49
Height = 41
Caption = '關閉'
Flat = True
Glyph.Data = {
EE000000424DEE000000000000007600000028000000100000000F0000000100
0400000000007800000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFF0FFFFFF
FFFFFFFF00FFFFFFFFFFFFF030FFFFFFFFFFFF0330FFFFFFFFFF003330000000
0FFFF03330FF0FFFFFFFF03300FF0FFFF4FFF03330FF0FFF44FFF03330FF0FF4
4444F03330FF0F444444F03330FF0FF44444F0330FFF0FFF44FFF030FFFF0FFF
F4FFF00FFFFF0FFFFFFFF00000000FFFFFFF}
Layout = blGlyphTop
OnClick = SpeedButton3Click
end
object Panel1: TPanel
Left = 4
Top = 5
Width = 381
Height = 46
BevelInner = bvLowered
BevelOuter = bvNone
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = '宋體'
Font.Style = []
ParentFont = False
TabOrder = 0
object Label1: TLabel
Left = 28
Top = 18
Width = 60
Height = 15
Caption = '變更年月'
end
object Label2: TLabel
Left = 226
Top = 18
Width = 60
Height = 15
Caption = '變更內容'
end
object ComboBox1: TComboBox
Left = 288
Top = 15
Width = 65
Height = 21
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = '宋體'
Font.Style = []
ItemHeight = 13
ParentFont = False
TabOrder = 0
Text = '新裝'
Items.Strings = (
'新裝'
'增容'
'減容'
'暫停'
'恢復'
'暫換'
'遷址'
'移表'
'暫拆'
'過戶'
'分戶'
'并戶'
'銷戶'
'改壓'
'改類')
end
object DateTimePicker1: TDateTimePicker
Left = 97
Top = 12
Width = 81
Height = 23
CalAlignment = dtaLeft
Date = 37337
Time = 37337
DateFormat = dfShort
DateMode = dmComboBox
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -15
Font.Name = '宋體'
Font.Style = []
Kind = dtkDate
ParseInput = False
ParentFont = False
TabOrder = 1
end
end
object DBGrid1: TDBGrid
Left = 0
Top = 56
Width = 558
Height = 296
DataSource = YDData.QSyhbgcx
TabOrder = 1
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = '宋體'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'YD_QH'
Title.Caption = '區號'
Width = 55
Visible = True
end
item
Expanded = False
FieldName = 'YD_HH'
Title.Caption = '戶號'
Visible = True
end
item
Expanded = False
FieldName = 'YD_YHMC'
Title.Caption = '用戶名稱'
Width = 68
Visible = True
end
item
Expanded = False
FieldName = 'YD_YHDZ'
Title.Caption = '用戶地址'
Width = 104
Visible = True
end
item
Expanded = False
FieldName = 'YD_SQNR'
Title.Caption = '申請內容'
Visible = True
end
item
Expanded = False
FieldName = 'YD_YHFL'
Title.Caption = '用戶分類'
Visible = True
end
item
Expanded = False
FieldName = 'YD_HYDM'
Title.Caption = '行業代碼'
Width = 58
Visible = True
end
item
Expanded = False
FieldName = 'YD_HZZM'
Title.Caption = '核準照明'
Visible = True
end
item
Expanded = False
FieldName = 'YD_HZDL'
Title.Caption = '核準動力'
Visible = True
end
item
Expanded = False
FieldName = 'YD_GDFS'
Title.Caption = '計量方式'
Visible = True
end
item
Expanded = False
FieldName = 'YD_GDDY'
Title.Caption = '供電電壓'
Visible = True
end
item
Expanded = False
FieldName = 'YD_LLBZ'
Title.Caption = '力率標準'
Visible = True
end
item
Expanded = False
FieldName = 'YD_JDRQ'
Title.Caption = '接電日期'
Visible = True
end
item
Expanded = False
FieldName = 'YD_TFRL'
Title.Caption = '貼費容量'
Visible = True
end
item
Expanded = False
FieldName = 'YD_PDTF'
Title.Caption = '配電貼費'
Visible = True
end
item
Expanded = False
FieldName = 'YD_GDTF'
Title.Caption = '供電貼費'
Visible = True
end
item
Expanded = False
FieldName = 'YD_DBBZ'
Title.Caption = '電表保證金'
Visible = True
end
item
Expanded = False
FieldName = 'YD_DFBZ'
Title.Caption = '電費保證金'
Visible = True
end
item
Expanded = False
FieldName = 'YD_BCTF'
Title.Caption = '補充貼費'
Visible = True
end>
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -