📄 unit1.~dfm
字号:
OnMouseMove = DBGrid3MouseMove
Columns = <
item
Expanded = False
FieldName = 'no'
Visible = True
end
item
Expanded = False
FieldName = 'dz'
Title.Caption = #21333#20301
Visible = True
end
item
Expanded = False
FieldName = 'lb'
Title.Caption = #26426#26500#31867#21035
Visible = True
end
item
Expanded = False
FieldName = 'ls'
Title.Caption = #26426#26500#38582#23646
Visible = True
end
item
Expanded = False
FieldName = 'jb'
Title.Caption = #26426#26500#32423#21035
Visible = True
end
item
Expanded = False
FieldName = 'xz'
Title.Caption = #26426#26500#24615#36136
Visible = True
end
item
Expanded = False
FieldName = 'hy'
Title.Caption = #26426#26500#34892#19994
Visible = True
end
item
Expanded = False
FieldName = 'g1'
Visible = True
end
item
Expanded = False
FieldName = 'g2'
Visible = True
end
item
Expanded = False
FieldName = 'g3'
Visible = True
end
item
Expanded = False
FieldName = 'g4'
Visible = True
end
item
Expanded = False
FieldName = 'px'
Visible = True
end
item
Expanded = False
FieldName = 'bz'
Visible = True
end>
end
end
object GroupBox2: TGroupBox
Left = 1
Top = 321
Width = 708
Height = 153
Align = alClient
Caption = #24050#26356#26032#35760#24405#21015#34920
TabOrder = 1
object Memo1: TMemo
Left = 2
Top = 15
Width = 704
Height = 136
Align = alClient
Lines.Strings = (
'')
TabOrder = 0
OnMouseMove = Memo1MouseMove
end
end
end
end
object TabSheet4: TTabSheet
Caption = #32500#25252#26087#21333#20301#34920
ImageIndex = 3
OnMouseMove = TabSheet4MouseMove
object Panel16: TPanel
Left = 0
Top = 0
Width = 1007
Height = 41
Align = alTop
TabOrder = 0
OnMouseMove = Panel16MouseMove
object Label8: TLabel
Left = 384
Top = 8
Width = 437
Height = 13
Caption = #26412#31243#24207#30001#26032#30086#20234#23425#24066#26361#20975#29256#26435#25152#26377' '#22914#26377#38382#39064#35831#19982#20316#32773#32852#31995' '#32852#31995#26041#24335#65306'oicq 3020616 '
Color = clInactiveCaption
ParentColor = False
end
object Label11: TLabel
Left = 384
Top = 8
Width = 449
Height = 25
AutoSize = False
Transparent = True
OnMouseMove = Label11MouseMove
end
object DBNavigator2: TDBNavigator
Left = 8
Top = 8
Width = 370
Height = 25
DataSource = DataSource5
TabOrder = 0
end
end
object DBGrid5: TDBGrid
Left = 0
Top = 41
Width = 1007
Height = 475
Align = alClient
DataSource = DataSource5
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnMouseDown = DBGrid5MouseDown
Columns = <
item
Expanded = False
FieldName = 'no'
Visible = True
end
item
Expanded = False
FieldName = 'dz'
Title.Caption = #22320#22336
Width = 172
Visible = True
end
item
Expanded = False
FieldName = 'lb'
Title.Caption = #26426#26500#31867#21035
Visible = True
end
item
Expanded = False
FieldName = 'ls'
Title.Caption = #26426#26500#38582#23646
Visible = True
end
item
Expanded = False
FieldName = 'jb'
Title.Caption = #26426#26500#32423#21035
Visible = True
end
item
Expanded = False
FieldName = 'xz'
Title.Caption = #26426#26500#24615#36136
Width = 83
Visible = True
end
item
Expanded = False
FieldName = 'hy'
Title.Caption = #26426#26500#34892#19994
Width = 68
Visible = True
end
item
Expanded = False
FieldName = 'g1'
Visible = True
end
item
Expanded = False
FieldName = 'g2'
Visible = True
end
item
Expanded = False
FieldName = 'g3'
Visible = True
end
item
Expanded = False
FieldName = 'g4'
Visible = True
end
item
Expanded = False
FieldName = 'px'
Visible = True
end
item
Expanded = False
FieldName = 'bz'
Visible = True
end>
end
end
end
end
object Panel4: TPanel
Left = 0
Top = 0
Width = 1017
Height = 41
Align = alTop
TabOrder = 1
OnMouseDown = Panel4MouseDown
object Edit1: TEdit
Left = 840
Top = 16
Width = 169
Height = 21
TabOrder = 2
Text = 'Edit1'
Visible = False
end
object Button1: TButton
Left = 16
Top = 8
Width = 75
Height = 25
Caption = #29983#25104
TabOrder = 0
OnClick = Button1Click
OnMouseMove = Button1MouseMove
end
object CheckBox1: TCheckBox
Left = 144
Top = 16
Width = 97
Height = 17
Caption = #22312#32844#20154#21592
TabOrder = 1
Visible = False
end
object Button4: TButton
Left = 558
Top = 15
Width = 177
Height = 25
Caption = #21019#24314'OrganizationToDwk'#25968#25454
TabOrder = 3
OnClick = Button4Click
OnMouseMove = Button4MouseMove
end
end
object Query1: TADOQuery
Connection = ADOConnection1
Parameters = <>
Left = 277
Top = 8
end
object ADOConnection1: TADOConnection
LoginPrompt = False
Provider = 'MSDASQL.1'
Left = 213
Top = 8
end
object Query2: TADOQuery
Connection = ADOConnection1
Parameters = <>
Left = 341
end
object Query3: TADOQuery
Connection = ADOConnection1
Parameters = <>
Left = 309
end
object DataSource1: TDataSource
AutoEdit = False
DataSet = Query1
Left = 336
Top = 24
end
object ADOConnection2: TADOConnection
LoginPrompt = False
Provider = 'VFPOLEDB.1'
Left = 384
Top = 32
end
object ADOQuery1: TADOQuery
Connection = ADOConnection2
Parameters = <>
Left = 424
Top = 33
end
object ADOQuery2: TADOQuery
Connection = ADOConnection2
Parameters = <>
Left = 456
Top = 32
end
object DataSource2: TDataSource
DataSet = ADOQuery1
Left = 512
Top = 33
end
object ADOTable1: TADOTable
Connection = ADOConnection1
Left = 112
Top = 9
end
object DataSource3: TDataSource
DataSet = ADOTable1
Left = 240
Top = 41
end
object ADOConnection3: TADOConnection
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'VFPOLEDB.1'
Left = 640
Top = 24
end
object DataSource4: TDataSource
DataSet = ADOTable2
Left = 688
Top = 16
end
object ADOTable2: TADOTable
Connection = ADOConnection3
CursorType = ctStatic
IndexFieldNames = 'no'
TableName = 'DWK'
Left = 592
Top = 33
end
object ADOQuery3: TADOQuery
Connection = ADOConnection3
Parameters = <>
Left = 720
Top = 17
end
object Query4: TADOQuery
Connection = ADOConnection1
Parameters = <>
Left = 752
Top = 16
end
object ADOQuery4: TADOQuery
Connection = ADOConnection3
Parameters = <>
Left = 792
Top = 16
end
object ADOConnection4: TADOConnection
Left = 832
Top = 16
end
object DataSource5: TDataSource
DataSet = ADOTable3
Left = 413
Top = 74
end
object ADOTable3: TADOTable
Connection = ADOConnection4
IndexFieldNames = 'no'
TableName = 'DWK'
Left = 525
Top = 74
end
object Query5: TADOQuery
Connection = ADOConnection1
Parameters = <>
Left = 248
Top = 8
end
object Query6: TADOQuery
Connection = ADOConnection1
Parameters = <>
Left = 784
Top = 48
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -