📄 ding_pi_liu.dfm
字号:
object ding_pi_li: Tding_pi_li
Left = -2
Top = 103
Width = 800
Height = 375
Caption = #35330#36092#29289#26009#28687#35261
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnClose = FormClose
DesignSize = (
792
348)
PixelsPerInch = 96
TextHeight = 13
object SpeedButton1: TSpeedButton
Left = 459
Top = 310
Width = 41
Height = 33
Hint = #36820#22238
Anchors = [akLeft, akBottom]
Flat = True
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333333333333333
3333333333333FF3333333333333003333333333333F77F33333333333009033
333333333F7737F333333333009990333333333F773337FFFFFF330099999000
00003F773333377777770099999999999990773FF33333FFFFF7330099999000
000033773FF33777777733330099903333333333773FF7F33333333333009033
33333333337737F3333333333333003333333333333377333333333333333333
3333333333333333333333333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton1Click
end
object DBGrid1: TDBGrid
Left = 8
Top = 7
Width = 777
Height = 143
Anchors = [akLeft, akTop, akRight]
Color = clLime
DataSource = DataSource1
ReadOnly = True
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'ding_gou_computerno'
Title.Caption = #35330#36092#27969#27700#34399
Visible = True
end
item
Expanded = False
FieldName = 'ding_gou_no'
Title.Caption = #35330#36092#21934#32232#34399
Visible = True
end
item
Expanded = False
FieldName = 'chang_shang_no'
Title.Caption = #24288#21830#32232#34399
Visible = True
end
item
Expanded = False
FieldName = 'chang_shang_name'
Title.Caption = #24288#21830#21517#31281
Visible = True
end
item
Expanded = False
FieldName = 'ding_gou_date'
Title.Caption = #35330#36092#26085#26399
Visible = True
end
item
Expanded = False
FieldName = 'jiao_ji'
Title.Caption = #20132#26399
Visible = True
end
item
Expanded = False
FieldName = 'ding_gou_phone'
Title.Caption = #38651#35441
Visible = True
end
item
Expanded = False
FieldName = 'ding_gou_fax'
Title.Caption = #20756#30495
Visible = True
end
item
Expanded = False
FieldName = 'ding_gou_ren'
Title.Caption = #25505#36092#21729
Visible = True
end
item
Expanded = False
FieldName = 'fo_bi_kind'
Title.Caption = #36008#24163#31181#39006
Visible = True
end
item
Expanded = False
FieldName = 'fu_kuan_kind'
Title.Caption = #20184#27454#26041#24335
Visible = True
end
item
Expanded = False
FieldName = 'yes_or_no'
Title.Caption = #26159#21542#25209#20934
Visible = True
end
item
Expanded = False
FieldName = 'pi_zhen_ren'
Title.Caption = #25209#20934#20154
Visible = True
end
item
Expanded = False
FieldName = 'shen_he_ren'
Title.Caption = #23529#26680#20154
Visible = True
end
item
Expanded = False
FieldName = 'shu_dan_ren'
Title.Caption = #36664#21934#20154
Visible = True
end
item
Expanded = False
FieldName = 'bei_zhu'
Title.Caption = #20633#27880
Visible = True
end>
end
object DBGrid2: TDBGrid
Left = 8
Top = 154
Width = 777
Height = 151
Anchors = [akLeft, akTop, akRight, akBottom]
Color = clYellow
DataSource = DataSource2
ReadOnly = True
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'qing_gou_no'
Title.Caption = #35531#36092#21934#32232#34399
Visible = True
end
item
Expanded = False
FieldName = 'ding_gou_no'
Title.Caption = #35330#36092#21934#32232#34399
Visible = True
end
item
Expanded = False
FieldName = 'zi_hao'
Title.Caption = #23376#34399
Visible = True
end
item
Expanded = False
FieldName = 'wu_no'
Title.Caption = #29289#26009#32232#34399
Visible = True
end
item
Expanded = False
FieldName = 'wu_name'
Title.Caption = #29289#26009#21517#31281
Visible = True
end
item
Expanded = False
FieldName = 'wu_gui'
Title.Caption = #35215#26684
Visible = True
end
item
Expanded = False
FieldName = 'dan_wei'
Title.Caption = #21934#20301
Visible = True
end
item
Expanded = False
FieldName = 'ding_shu_liang'
Title.Caption = #35330#36092#25976#37327
Visible = True
end
item
Expanded = False
FieldName = 'ding_dan_jia'
Title.Caption = #21934#20215
Visible = True
end
item
Expanded = False
FieldName = 'ren_jia'
Title.Caption = #21934#20215#25240#20154#27665#24163
Visible = True
end
item
Expanded = False
FieldName = 'zhong_jia'
Title.Caption = #32317#20215
Visible = True
end
item
Expanded = False
FieldName = 'ren_ming_bi'
Title.Caption = #37329#38989#25240#20154#27665#24163
Visible = True
end>
end
object DBNavigator1: TDBNavigator
Left = 248
Top = 310
Width = 210
Height = 33
VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbRefresh]
Anchors = [akLeft, akBottom]
Flat = True
ParentShowHint = False
ShowHint = True
TabOrder = 2
end
object Query1: TQuery
Active = True
DatabaseName = 'vvv'
SQL.Strings = (
'select * from ding_gou_zhu')
Left = 208
Top = 104
end
object Query2: TQuery
Active = True
DatabaseName = 'vvv'
SQL.Strings = (
'select * from ding_gou_chong')
Left = 200
Top = 216
end
object DataSource1: TDataSource
DataSet = Query1
Left = 264
Top = 88
end
object DataSource2: TDataSource
DataSet = Query2
Left = 264
Top = 224
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -