?? unit_input_cgth.dfm
字號:
inherited form_input_cgth: Tform_input_cgth
Left = 185
Top = 159
Caption = #38144#21806#36864#36135
OldCreateOrder = True
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 34
Width = 786
Height = 87
Align = alTop
BevelInner = bvLowered
TabOrder = 0
object Label1: TLabel
Left = 18
Top = 13
Width = 65
Height = 13
Caption = #36864#36135#21333#21495#65306
end
object Label2: TLabel
Left = 222
Top = 13
Width = 65
Height = 13
Caption = #21333#25454#26085#26399#65306
end
object Label5: TLabel
Left = 18
Top = 37
Width = 65
Height = 13
Caption = #20184#27454#26041#24335#65306
end
object Label6: TLabel
Left = 235
Top = 37
Width = 52
Height = 13
Caption = #19994#21153#21592#65306
end
object Label7: TLabel
Left = 426
Top = 37
Width = 52
Height = 13
Caption = #25805#20316#21592#65306
end
object Label8: TLabel
Left = 18
Top = 61
Width = 65
Height = 13
Caption = #26412#21333#37329#39069#65306
end
object Label9: TLabel
Left = 218
Top = 63
Width = 65
Height = 13
Caption = #22791#27880#35828#26126#65306
end
object Label3: TLabel
Left = 438
Top = 13
Width = 39
Height = 13
Caption = #23458#25143#65306
end
object SpeedButton1: TSpeedButton
Left = 752
Top = 7
Width = 23
Height = 22
Caption = '..'
OnClick = SpeedButton1Click
end
object DBEdit1: TDBEdit
Left = 77
Top = 8
Width = 131
Height = 21
Color = cl3DLight
DataField = 't0501'
DataSource = DataSource1
ReadOnly = True
TabOrder = 0
end
object DBDateEdit1: TDBDateEdit
Left = 280
Top = 8
Width = 131
Height = 21
DataField = 't0502'
DataSource = DataSource1
Color = 16572566
NumGlyphs = 2
TabOrder = 1
OnChange = DBDateEdit1Change
end
object DBComboBox2: TDBComboBox
Left = 77
Top = 33
Width = 131
Height = 21
Color = 16572566
DataField = 't0504'
DataSource = DataSource1
ItemHeight = 13
TabOrder = 3
end
object DBComboBox3: TDBComboBox
Left = 280
Top = 33
Width = 96
Height = 21
Color = 16572566
DataField = 't0506'
DataSource = DataSource1
ItemHeight = 13
TabOrder = 4
end
object DBEdit2: TDBEdit
Left = 473
Top = 33
Width = 81
Height = 21
Color = cl3DLight
DataField = 't0507'
DataSource = DataSource1
TabOrder = 5
end
object DBEdit3: TDBEdit
Left = 77
Top = 58
Width = 131
Height = 21
Color = cl3DLight
DataField = 't0505'
DataSource = DataSource1
ReadOnly = True
TabOrder = 6
end
object DBEdit4: TDBEdit
Left = 279
Top = 59
Width = 460
Height = 21
Color = 16572566
DataField = 't0508'
DataSource = DataSource1
TabOrder = 7
end
object Edit_gys: TEdit
Left = 473
Top = 8
Width = 279
Height = 21
Color = cl3DLight
TabOrder = 2
end
end
object DBGrid1: TDBGrid
Left = 0
Top = 161
Width = 786
Height = 296
Align = alClient
Color = 16382446
DataSource = DataSource2
Options = [dgEditing, dgAlwaysShowEditor, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
TabOrder = 1
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnKeyDown = DBGrid1KeyDown
Columns = <
item
Expanded = False
FieldName = #21830#21697#21517#31216
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = #20135#21697#21517#31216
Width = 200
Visible = True
end
item
Expanded = False
FieldName = #35268#26684
ReadOnly = True
Title.Alignment = taCenter
Width = 80
Visible = True
end
item
Expanded = False
FieldName = #21333#20301
ReadOnly = True
Title.Alignment = taCenter
Width = 40
Visible = True
end
item
Expanded = False
FieldName = #39068#33394
ReadOnly = True
Title.Alignment = taCenter
Width = 80
Visible = True
end
item
Expanded = False
FieldName = 't0603'
Title.Alignment = taCenter
Title.Caption = #25968#37327
Width = 70
Visible = True
end
item
Expanded = False
FieldName = 't0604'
Title.Alignment = taCenter
Title.Caption = #21333#20215
Width = 70
Visible = True
end
item
Expanded = False
FieldName = 't0605'
Title.Alignment = taCenter
Title.Caption = #37329#39069
Width = 90
Visible = True
end
item
Expanded = False
FieldName = 't0606'
Title.Alignment = taCenter
Title.Caption = #22791#27880
Width = 110
Visible = True
end>
end
object Panel2: TPanel
Left = 0
Top = 121
Width = 786
Height = 40
Align = alTop
BevelOuter = bvNone
TabOrder = 2
object BitBtn_new_dj: TBitBtn
Left = 270
Top = 8
Width = 61
Height = 25
Caption = #26032#24320#21333#25454
TabOrder = 3
OnClick = BitBtn_new_djClick
end
object BitBtn_save: TBitBtn
Left = 338
Top = 8
Width = 61
Height = 25
Caption = #30830#23450#20445#23384
TabOrder = 4
OnClick = BitBtn_saveClick
end
object BitBtn_delete_dj: TBitBtn
Left = 406
Top = 8
Width = 61
Height = 25
Caption = #21024#38500#21333#25454
TabOrder = 5
OnClick = BitBtn_delete_djClick
end
object BitBtn_new_sp: TBitBtn
Left = 473
Top = 8
Width = 61
Height = 25
Caption = #26032#22686#21830#21697
TabOrder = 6
OnClick = BitBtn_new_spClick
end
object BitBtn_delete_sp: TBitBtn
Left = 541
Top = 8
Width = 61
Height = 25
Caption = #21024#38500#21830#21697
TabOrder = 7
OnClick = BitBtn_delete_spClick
end
object BitBtn_quit: TBitBtn
Left = 697
Top = 8
Width = 61
Height = 25
Caption = #36864#20986
TabOrder = 8
OnClick = BitBtn_quitClick
end
object BitBtn_prior: TBitBtn
Left = 19
Top = 8
Width = 61
Height = 25
Caption = #19978#19968#21333
TabOrder = 0
OnClick = BitBtn_priorClick
end
object BitBtn_next: TBitBtn
Left = 86
Top = 8
Width = 61
Height = 25
Caption = #19979#19968#21333
TabOrder = 1
OnClick = BitBtn_nextClick
end
object BitBtn_end: TBitBtn
Left = 154
Top = 8
Width = 61
Height = 25
Caption = #26368#26411#21333
TabOrder = 2
OnClick = BitBtn_endClick
end
end
object Panel3: TPanel
Left = 0
Top = 0
Width = 786
Height = 34
Align = alTop
BevelOuter = bvNone
TabOrder = 3
object Label11: TLabel
Left = 12
Top = 10
Width = 91
Height = 13
Caption = #21333#25454#32534#21495#26597#35810#65306
end
object Edit_dh: TEdit
Left = 96
Top = 6
Width = 132
Height = 21
TabOrder = 0
OnKeyDown = Edit_dhKeyDown
end
object BitBtn_find: TBitBtn
Left = 235
Top = 4
Width = 75
Height = 25
Caption = #26597#35810
TabOrder = 1
OnClick = BitBtn_findClick
end
end
object ADOQuery1: TADOQuery
Connection = Form_main.ADOCn
CursorType = ctStatic
AfterClose = ADOQuery1AfterClose
AfterInsert = ADOQuery1AfterInsert
AfterScroll = ADOQuery1AfterScroll
Parameters = <>
SQL.Strings = (
'select * from t05')
Left = 104
Top = 56
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 136
Top = 56
end
object DataSource2: TDataSource
DataSet = ADOQuery2
Left = 160
Top = 224
end
object ADOQuery2: TADOQuery
Connection = Form_main.ADOCn
CursorType = ctStatic
AfterInsert = ADOQuery2AfterInsert
Parameters = <>
SQL.Strings = (
'select *,'
'(select t0702 from t07 where t0700=t0602) as '#21830#21697#21517#31216','
'(select t0707 from t07 where t0700=t0602) as '#21333#20301','
'(select t0704 from t07 where t0700=t0602) as '#39068#33394','
'(select t0703 from t07 where t0700=t0602) as '#35268#26684
'from t06')
Left = 128
Top = 224
end
object ADOQuery3: TADOQuery
Connection = Form_main.ADOCn
Parameters = <>
Left = 712
Top = 200
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -