?? unit_input_cgsh.dfm
字號:
inherited form_input_cgsh: Tform_input_cgsh
Left = 183
Top = 188
Caption = #29983#20135#20837#24211
OldCreateOrder = True
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 34
Width = 786
Height = 71
Align = alTop
BevelInner = bvLowered
TabOrder = 0
object Label1: TLabel
Left = 17
Top = 13
Width = 65
Height = 13
Caption = #20837#24211#21333#21495#65306
end
object Label2: TLabel
Left = 222
Top = 13
Width = 65
Height = 13
Caption = #21333#25454#26085#26399#65306
end
object Label7: TLabel
Left = 418
Top = 13
Width = 52
Height = 13
Caption = #25805#20316#21592#65306
end
object Label9: TLabel
Left = 18
Top = 39
Width = 65
Height = 13
Caption = #22791#27880#35828#26126#65306
end
object DBEdit1: TDBEdit
Left = 77
Top = 8
Width = 131
Height = 21
Color = cl3DLight
DataField = 't1001'
DataSource = DataSource1
ReadOnly = True
TabOrder = 0
end
object DBDateEdit1: TDBDateEdit
Left = 281
Top = 8
Width = 131
Height = 21
DataField = 't1002'
DataSource = DataSource1
Color = 16572566
DefaultToday = True
NumGlyphs = 2
TabOrder = 1
OnChange = DBDateEdit1Change
end
object DBEdit2: TDBEdit
Left = 464
Top = 9
Width = 81
Height = 21
Color = cl3DLight
DataField = 't1003'
DataSource = DataSource1
TabOrder = 2
end
object DBEdit4: TDBEdit
Left = 77
Top = 35
Width = 676
Height = 21
Color = 16572566
DataField = 't1004'
DataSource = DataSource1
TabOrder = 3
end
end
object DBGrid1: TDBGrid
Left = 0
Top = 145
Width = 786
Height = 312
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 = 't1102'
Title.Alignment = taCenter
Title.Caption = #25968#37327
Width = 70
Visible = True
end
item
Expanded = False
FieldName = 't1103'
Title.Alignment = taCenter
Title.Caption = #22791#27880
Width = 70
Visible = True
end>
end
object Panel2: TPanel
Left = 0
Top = 105
Width = 786
Height = 40
Align = alTop
BevelOuter = bvNone
TabOrder = 2
object BitBtn_new_dj: TBitBtn
Left = 222
Top = 8
Width = 61
Height = 25
Caption = #26032#24320#21333#25454
TabOrder = 3
OnClick = BitBtn_new_djClick
end
object BitBtn_save: TBitBtn
Left = 290
Top = 8
Width = 61
Height = 25
Caption = #30830#23450#20445#23384
TabOrder = 4
OnClick = BitBtn_saveClick
end
object BitBtn_delete_dj: TBitBtn
Left = 358
Top = 8
Width = 61
Height = 25
Caption = #21024#38500#21333#25454
TabOrder = 5
OnClick = BitBtn_delete_djClick
end
object BitBtn_new_sp: TBitBtn
Left = 425
Top = 8
Width = 61
Height = 25
Caption = #26032#22686#21830#21697
TabOrder = 6
OnClick = BitBtn_new_spClick
end
object BitBtn_delete_sp: TBitBtn
Left = 493
Top = 8
Width = 61
Height = 25
Caption = #21024#38500#21830#21697
TabOrder = 7
OnClick = BitBtn_delete_spClick
end
object BitBtn_print: TBitBtn
Left = 561
Top = 8
Width = 61
Height = 25
Caption = #25171#21360#21333#25454
TabOrder = 8
OnClick = BitBtn_printClick
end
object BitBtn_quit: TBitBtn
Left = 697
Top = 8
Width = 61
Height = 25
Caption = #36864#20986
TabOrder = 9
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 t10')
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=t1101) as '#21830#21697#21517#31216','
'(select t0707 from t07 where t0700=t1101) as '#21333#20301','
'(select t0704 from t07 where t0700=t1101) as '#39068#33394','
'(select t0703 from t07 where t0700=t1101) as '#35268#26684
'from t11')
Left = 128
Top = 224
end
object ADOQuery3: TADOQuery
Connection = Form_main.ADOCn
Parameters = <>
Left = 712
Top = 200
end
object RMReport1: TRMReport
Dataset = RMDBDataSet1
InitialZoom = pzPageWidth
ModifyPrepared = True
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit]
Left = 560
Top = 248
ReportForm = {28000000}
end
object RMDBDataSet1: TRMDBDataSet
DataSet = ADOQuery2
Left = 592
Top = 248
end
end
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -