?? cha_jue_dan.~dfm
字號:
object cha_jue_da: Tcha_jue_da
Left = 8
Top = 90
Width = 777
Height = 413
Caption = #21129#35261#25505#36092#32080#21934#24773#27841
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnClose = FormClose
DesignSize = (
769
386)
PixelsPerInch = 96
TextHeight = 13
object SpeedButton1: TSpeedButton
Left = 392
Top = 352
Width = 100
Height = 25
Hint = #36864#20986
Anchors = [akLeft, akTop, akRight, 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 SpeedButton2: TSpeedButton
Left = 240
Top = 352
Width = 100
Height = 25
Hint = #26597#25214
Flat = True
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333FF33333333333330003FF3FFFFF3333777003000003333
300077F777773F333777E00BFBFB033333337773333F7F33333FE0BFBF000333
330077F3337773F33377E0FBFBFBF033330077F3333FF7FFF377E0BFBF000000
333377F3337777773F3FE0FBFBFBFBFB039977F33FFFFFFF7377E0BF00000000
339977FF777777773377000BFB03333333337773FF733333333F333000333333
3300333777333333337733333333333333003333333333333377333333333333
333333333333333333FF33333333333330003333333333333777333333333333
3000333333333333377733333333333333333333333333333333}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton2Click
end
object DBGrid1: TDBGrid
Left = 5
Top = 10
Width = 756
Height = 183
Anchors = [akLeft, akTop, akRight, akBottom]
Color = clGradientActiveCaption
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_no'
Title.Caption = #25505#36092#21934#32232#34399
Visible = True
end
item
Expanded = False
FieldName = 'ding_gou_date'
Title.Caption = #19979#21934#26085#26399
Visible = True
end
item
Expanded = False
FieldName = 'chang_shang_no'
Title.Caption = #20379#25033#21830#32232#34399
Visible = True
end
item
Expanded = False
FieldName = 'chang_shang_name'
Title.Caption = #20379#25033#21830#21517#31281
Visible = True
end
item
Expanded = False
FieldName = 'ding_gou_computerno'
Title.Caption = #38651#33126#32232#34399
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 = #20659#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 = 'jiao_ji'
Title.Caption = #20132#26399
Visible = True
end
item
Expanded = False
FieldName = 'yes_or_no'
Title.Caption = #25209#28310#29376#24907
Visible = True
end
item
Expanded = False
FieldName = 'jue_dan_date'
Title.Caption = #32080#21934#26085#26399
Visible = True
end
item
Expanded = False
FieldName = 'bei_zhu'
Title.Caption = #20633#27880
Visible = True
end>
end
object DBGrid2: TDBGrid
Left = 5
Top = 196
Width = 756
Height = 149
Anchors = [akLeft, akRight, akBottom]
Color = clLime
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 = 'ding_gou_no'
Title.Caption = #35330#36092#21934#32232#34399
Visible = True
end
item
Expanded = False
FieldName = 'qing_gou_no'
Title.Caption = #35531#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_no'
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 = #25505#36092#25976#37327
Visible = True
end
item
Expanded = False
FieldName = 'ding_dan_jia'
Title.Caption = #24288#21830#21934#20215
Visible = True
end
item
Expanded = False
FieldName = 'ren_jia'
Title.Caption = #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 = #25240#20154#27665#24163
Visible = True
end>
end
object DataSource1: TDataSource
DataSet = Table1
Left = 408
Top = 104
end
object Database1: TDatabase
AliasName = 'ding_jue'
Connected = True
DatabaseName = 'bgty0'
LoginPrompt = False
Params.Strings = (
'USER NAME=sa')
SessionName = 'Default'
OnLogin = Database1Login
Left = 480
Top = 88
end
object Table1: TTable
Active = True
DatabaseName = 'bgty0'
TableName = 'dbo.ding_gou_zhu'
Left = 272
Top = 128
end
object Table2: TTable
Active = True
DatabaseName = 'bgty0'
IndexFieldNames = 'ding_gou_no'
MasterFields = 'ding_gou_no'
MasterSource = DataSource1
TableName = 'dbo.ding_gou_chong'
Left = 288
Top = 232
end
object DataSource2: TDataSource
DataSet = Table2
Left = 432
Top = 256
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -