提交 5c1b2c58 编写于 作者: cz_012273's avatar cz_012273

上传新文件

上级 8d0a10fe
object Form4: TForm4
Left = 0
Top = 0
BorderIcons = [biMinimize, biMaximize]
BorderStyle = bsSingle
Caption = #24211#23384#25968#25454#26597#35810
ClientHeight = 410
ClientWidth = 621
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
Position = poMainFormCenter
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 31
Top = 56
Width = 24
Height = 13
Caption = #24207#21495
end
object Label2: TLabel
Left = 135
Top = 56
Width = 24
Height = 13
Caption = #21697#21517
end
object Label3: TLabel
Left = 311
Top = 56
Width = 24
Height = 13
Caption = #25968#37327
end
object Label4: TLabel
Left = 439
Top = 56
Width = 24
Height = 13
Caption = #35268#26684
end
object Label5: TLabel
Left = 31
Top = 104
Width = 48
Height = 13
Caption = #20837#24211#26085#26399
end
object Label6: TLabel
Left = 165
Top = 104
Width = 36
Height = 13
Caption = #20445#31649#20154
end
object Label7: TLabel
Left = 292
Top = 104
Width = 84
Height = 13
Caption = #20351#29992#21608#26399#65288#22825#65289
end
object DBText1: TDBText
Left = 61
Top = 56
Width = 43
Height = 17
DataField = #24207#21495
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object DBText2: TDBText
Left = 165
Top = 56
Width = 121
Height = 17
DataField = #21697#21517
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object DBText3: TDBText
Left = 341
Top = 56
Width = 67
Height = 17
DataField = #25968#37327
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object DBText4: TDBText
Left = 469
Top = 56
Width = 121
Height = 17
DataField = #35268#26684
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object DBText5: TDBText
Left = 85
Top = 104
Width = 74
Height = 17
DataField = #20837#24211#26085#26399
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object DBText6: TDBText
Left = 207
Top = 104
Width = 79
Height = 17
DataField = #20445#31649#20154
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object DBText7: TDBText
Left = 382
Top = 104
Width = 50
Height = 17
DataField = #20351#29992#21608#26399#65288#22825#65289
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 441
Top = 104
Width = 72
Height = 13
Caption = #20445#36136#26399#65288#22825#65289
end
object DBText8: TDBText
Left = 519
Top = 104
Width = 71
Height = 17
DataField = #20445#36136#26399#65288#22825#65289
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object Button1: TButton
Left = 140
Top = 343
Width = 111
Height = 41
Caption = #30830#23450
TabOrder = 0
OnClick = Button1Click
end
object Button2: TButton
Left = 370
Top = 343
Width = 111
Height = 41
Caption = #21462#28040
TabOrder = 1
OnClick = Button2Click
end
object DBGrid1: TDBGrid
Left = 31
Top = 145
Width = 559
Height = 176
DataSource = DataSource1
ReadOnly = True
TabOrder = 2
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'Tahoma'
TitleFont.Style = []
end
object FDQuery1: TFDQuery
Connection = FDConnection1
SQL.Strings = (
'select * from '#24211#23384#34920)
Left = 40
end
object FDConnection1: TFDConnection
Params.Strings = (
'LockingMode=Normal'
'DriverID=SQLite')
end
object DataSource1: TDataSource
DataSet = FDQuery1
Left = 80
end
end
Markdown is supported
0% .
You are about to add 0 people to the discussion. Proceed with caution.
先完成此消息的编辑!
想要评论请 注册