📄 unit15.dfm
字号:
object Form15: TForm15
Left = 204
Top = 194
Width = 685
Height = 367
BorderIcons = [biSystemMenu, biMinimize]
Caption = 'Form15'
Color = clBtnFace
Constraints.MaxHeight = 367
Constraints.MaxWidth = 685
Constraints.MinHeight = 367
Constraints.MinWidth = 685
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
PixelsPerInch = 96
TextHeight = 13
object PageControl3: TPageControl
Left = 8
Top = 8
Width = 665
Height = 321
ActivePage = TabSheet2
TabOrder = 0
object TabSheet2: TTabSheet
Caption = #21830#21697#20986#24211#31649#29702
ImageIndex = 1
object ListView2: TListView
Left = 0
Top = 8
Width = 409
Height = 265
Columns = <
item
Caption = #21830#21697#21495
end
item
Caption = #20986#24211#26102#38388
end
item
Caption = #20986#24211#25968#37327
end>
GridLines = True
TabOrder = 0
ViewStyle = vsReport
end
object GroupBox2: TGroupBox
Left = 416
Top = 8
Width = 233
Height = 193
Caption = #36873#39033
TabOrder = 1
object Label5: TLabel
Left = 32
Top = 32
Width = 39
Height = 13
Caption = #21830#21697#21495
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 24
Top = 88
Width = 52
Height = 13
Caption = #20986#24211#26102#38388
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 24
Top = 144
Width = 52
Height = 13
Caption = #20986#24211#25968#37327
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Edit5: TEdit
Left = 96
Top = 32
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 0
end
object Edit6: TEdit
Left = 96
Top = 80
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 1
end
object Edit7: TEdit
Left = 96
Top = 136
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 2
end
end
object Button4: TButton
Left = 416
Top = 232
Width = 75
Height = 25
Caption = #21047#26032#21015#34920
TabOrder = 2
OnClick = Button4Click
end
object Button5: TButton
Left = 496
Top = 232
Width = 75
Height = 25
Caption = #30830#23450
TabOrder = 3
OnClick = Button5Click
end
object Button6: TButton
Left = 576
Top = 232
Width = 75
Height = 25
Caption = #20851#38381
TabOrder = 4
OnClick = Button6Click
end
end
object TabSheet1: TTabSheet
Caption = #21830#21697#20837#24211#31649#29702
object ListView1: TListView
Left = 0
Top = 8
Width = 409
Height = 265
Columns = <
item
Caption = #21830#21697#21495
end
item
Caption = #20837#24211#26102#38388
end
item
Caption = #20837#24211#25968#37327
end
item
Caption = #20379#24212#21830#32534#21495
end>
GridLines = True
TabOrder = 0
ViewStyle = vsReport
end
object GroupBox1: TGroupBox
Left = 416
Top = 8
Width = 233
Height = 193
Caption = #36873#39033
TabOrder = 1
object Label1: TLabel
Left = 40
Top = 24
Width = 39
Height = 13
Caption = #21830#21697#21495
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 32
Top = 64
Width = 52
Height = 13
Caption = #20837#24211#26102#38388
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 32
Top = 104
Width = 52
Height = 13
Caption = #20837#24211#25968#37327
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 24
Top = 144
Width = 65
Height = 13
Caption = #20379#24212#21830#32534#21495
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Edit1: TEdit
Left = 104
Top = 24
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 0
end
object Edit2: TEdit
Left = 104
Top = 64
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 1
end
object Edit3: TEdit
Left = 104
Top = 104
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 2
end
object Edit4: TEdit
Left = 104
Top = 144
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 3
end
end
object Button1: TButton
Left = 416
Top = 224
Width = 75
Height = 25
Caption = #21047#26032#21015#34920
TabOrder = 2
OnClick = Button1Click
end
object Button2: TButton
Left = 496
Top = 224
Width = 75
Height = 25
Caption = #30830#23450
TabOrder = 3
OnClick = Button2Click
end
object Button3: TButton
Left = 576
Top = 224
Width = 75
Height = 25
Caption = #20851#38381
TabOrder = 4
OnClick = Button3Click
end
end
object TabSheet3: TTabSheet
Caption = #21830#21697#25253#24223#31649#29702
ImageIndex = 2
object ListView3: TListView
Left = 8
Top = 8
Width = 401
Height = 265
Columns = <
item
Caption = #21830#21697#21495
end
item
Caption = #25253#24223#26102#38388
end
item
Caption = #25253#24223#25968#37327
end>
GridLines = True
TabOrder = 0
ViewStyle = vsReport
end
object GroupBox3: TGroupBox
Left = 416
Top = 8
Width = 233
Height = 193
Caption = #36873#39033
TabOrder = 1
object Label8: TLabel
Left = 32
Top = 40
Width = 39
Height = 13
Caption = #21830#21697#21495
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 24
Top = 88
Width = 52
Height = 13
Caption = #25253#24223#26102#38388
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 24
Top = 136
Width = 52
Height = 13
Caption = #25253#24223#25968#37327
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Edit8: TEdit
Left = 96
Top = 32
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 0
end
object Edit9: TEdit
Left = 96
Top = 80
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 1
end
object Edit10: TEdit
Left = 96
Top = 128
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 2
end
end
object Button7: TButton
Left = 416
Top = 232
Width = 75
Height = 25
Caption = #21047#26032#21015#34920
TabOrder = 2
OnClick = Button7Click
end
object Button8: TButton
Left = 496
Top = 232
Width = 75
Height = 25
Caption = #30830#23450
TabOrder = 3
OnClick = Button8Click
end
object Button9: TButton
Left = 576
Top = 232
Width = 75
Height = 25
Caption = #20851#38381
TabOrder = 4
OnClick = Button9Click
end
end
end
object ADOConnection1: TADOConnection
ConnectionString =
'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
'fo=False;Initial Catalog=course;Data Source=(local);Use Procedur' +
'e for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation' +
' ID=AGAN;Use Encryption for Data=False;Tag with column collation' +
' when possible=False'
LoginPrompt = False
Provider = 'SQLOLEDB.1'
Left = 108
Top = 160
end
object ADOQuery1: TADOQuery
Connection = ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from Table2')
Left = 156
Top = 160
end
object ADOQuery2: TADOQuery
Connection = ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select *'
'from table2')
Left = 200
Top = 160
end
object ADOConnection2: TADOConnection
ConnectionString =
'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
'fo=False;Initial Catalog=course;Data Source=(local);Use Procedur' +
'e for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation' +
' ID=AGAN;Use Encryption for Data=False;Tag with column collation' +
' when possible=False'
LoginPrompt = False
Provider = 'SQLOLEDB.1'
Left = 108
Top = 200
end
object ADOQuery3: TADOQuery
Connection = ADOConnection2
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from Table3')
Left = 156
Top = 200
end
object ADOQuery4: TADOQuery
Connection = ADOConnection2
Parameters = <>
Left = 204
Top = 200
end
object ADOConnection3: TADOConnection
ConnectionString =
'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
'fo=False;Initial Catalog=course;Data Source=(local);Use Procedur' +
'e for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation' +
' ID=AGAN;Use Encryption for Data=False;Tag with column collation' +
' when possible=False'
LoginPrompt = False
Provider = 'SQLOLEDB.1'
Left = 108
Top = 240
end
object ADOQuery5: TADOQuery
Connection = ADOConnection3
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from Table4')
Left = 156
Top = 240
end
object ADOQuery6: TADOQuery
Connection = ADOConnection3
Parameters = <>
Left = 204
Top = 240
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -