📄 unit1.~dfm
字号:
end
object Label7: TLabel
Left = 264
Top = 32
Width = 66
Height = 13
Caption = #27880#20876#26085#26399' '
end
object Label8: TLabel
Left = 264
Top = 72
Width = 66
Height = 13
Caption = #39038#23458#21495#30721' '
end
object Label9: TLabel
Left = 264
Top = 112
Width = 66
Height = 13
Caption = #23456#29289#25551#36848' '
end
object Petinfo_xxxg_ok: TSpeedButton
Left = 280
Top = 256
Width = 73
Height = 25
Caption = #30830#23450'>>'
OnClick = Petinfo_xxtj_okClick
end
object Petinfo_xxxg_cl: TSpeedButton
Left = 368
Top = 256
Width = 65
Height = 25
Caption = #21462#28040'>>'
OnClick = Petinfo_xxxg_clClick
end
object Petinfo_xxxg_bk: TSpeedButton
Left = 448
Top = 256
Width = 65
Height = 25
Caption = #36820#22238'>>'
OnClick = Petinfo_xxxg_bkClick
end
object Petinfo_Edit3: TEdit
Left = 120
Top = 24
Width = 121
Height = 21
TabOrder = 0
OnChange = Petinfo_Edit3Change
end
object Petinfo_Edit4: TEdit
Left = 120
Top = 65
Width = 121
Height = 21
TabOrder = 1
OnChange = Petinfo_Edit3Change
end
object Petinfo_Edit6: TEdit
Left = 120
Top = 147
Width = 121
Height = 21
TabOrder = 2
OnChange = Petinfo_Edit3Change
end
object Petinfo_Edit7: TEdit
Left = 120
Top = 230
Width = 121
Height = 21
TabOrder = 3
OnChange = Petinfo_Edit3Change
end
object Petinfo_Edit8: TEdit
Left = 328
Top = 72
Width = 121
Height = 21
TabOrder = 4
OnChange = Petinfo_Edit3Change
end
object Petinfo_Edit9: TEdit
Left = 328
Top = 112
Width = 121
Height = 21
TabOrder = 5
OnChange = Petinfo_Edit3Change
end
object Petinfo_Edit5: TEdit
Left = 120
Top = 106
Width = 121
Height = 21
TabOrder = 6
OnChange = Petinfo_Edit3Change
end
object Petinfo_DateTimePicker2: TDateTimePicker
Left = 120
Top = 188
Width = 121
Height = 21
CalAlignment = dtaLeft
Date = 38230.4574321759
Time = 38230.4574321759
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 7
end
object Petinfo_DateTimePicker3: TDateTimePicker
Left = 328
Top = 32
Width = 121
Height = 21
CalAlignment = dtaLeft
Date = 38230.4580188426
Time = 38230.4580188426
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 8
end
end
end
end
object Petinfo_TabSheet3: TTabSheet
Caption = #23456#29289#20449#24687#28155#21152
ImageIndex = 2
object GroupBox4: TGroupBox
Left = 0
Top = 0
Width = 649
Height = 427
Align = alClient
Caption = #28155#21152#23456#29289#20449#24687
TabOrder = 0
object Label10: TLabel
Left = 48
Top = 24
Width = 57
Height = 13
Caption = #23456#29289#21495#30721' '
end
object Label11: TLabel
Left = 48
Top = 59
Width = 57
Height = 13
Caption = #23456#29289#21517#31216' '
end
object Label12: TLabel
Left = 48
Top = 95
Width = 57
Height = 13
Caption = #23456#29289#31181#31867' '
end
object Label13: TLabel
Left = 48
Top = 130
Width = 57
Height = 13
Caption = #35786#25152#21495#30721' '
end
object Label14: TLabel
Left = 48
Top = 166
Width = 57
Height = 13
Caption = #20986#29983#26085#26399' '
end
object Label15: TLabel
Left = 48
Top = 202
Width = 57
Height = 13
Caption = #23456#29289#29366#24577' '
end
object Label16: TLabel
Left = 264
Top = 40
Width = 60
Height = 13
Caption = #27880#20876#26085#26399' '
end
object Label17: TLabel
Left = 264
Top = 72
Width = 72
Height = 13
Caption = ' '#39038#23458#21495#30721' '
end
object Label18: TLabel
Left = 264
Top = 104
Width = 72
Height = 13
Caption = ' '#23456#29289#25551#36848' '
end
object Petinfo_Sheet3_cl: TSpeedButton
Left = 372
Top = 255
Width = 73
Height = 25
Caption = #21462#28040'>>'
end
object Petinfo_Sheet3_ok: TSpeedButton
Left = 272
Top = 256
Width = 73
Height = 25
Caption = #30830#23450'>>'
OnClick = Petinfo_Sheet3_okClick
end
object Petinfo_Sheet3_bk: TSpeedButton
Left = 472
Top = 255
Width = 73
Height = 25
Caption = #36820#22238'>>'
OnClick = Petinfo_Sheet3_bkClick
end
object Petinfo_Edit10: TEdit
Left = 120
Top = 24
Width = 121
Height = 21
TabOrder = 0
OnChange = Petinfo_Edit10Change
end
object Petinfo_Edit11: TEdit
Left = 120
Top = 59
Width = 121
Height = 21
TabOrder = 1
OnChange = Petinfo_Edit3Change
OnClick = Petinfo_Edit11Click
end
object Petinfo_Edit14: TEdit
Left = 120
Top = 200
Width = 121
Height = 21
TabOrder = 2
OnChange = Petinfo_Edit3Change
OnClick = Petinfo_Edit14Click
end
object Petinfo_Edit16: TEdit
Left = 336
Top = 96
Width = 121
Height = 21
TabOrder = 3
OnChange = Petinfo_Edit3Change
OnClick = Petinfo_Edit16Click
end
object Petinfo_Edit12: TEdit
Left = 120
Top = 94
Width = 121
Height = 21
TabOrder = 4
OnChange = Petinfo_Edit3Change
OnClick = Petinfo_Edit12Click
end
object DateTimePicker4: TDateTimePicker
Left = 120
Top = 164
Width = 121
Height = 21
CalAlignment = dtaLeft
Date = 38230.4574321759
Time = 38230.4574321759
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 5
end
object DateTimePicker5: TDateTimePicker
Left = 336
Top = 32
Width = 121
Height = 21
CalAlignment = dtaLeft
Date = 38230.4580188426
Time = 38230.4580188426
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 6
end
object Petinfo_Edit13: TComboBox
Left = 120
Top = 129
Width = 121
Height = 21
ItemHeight = 0
TabOrder = 7
Text = 'Petinfo_Edit13'
end
object Petinfo_Edit15: TComboBox
Left = 336
Top = 64
Width = 121
Height = 21
ItemHeight = 0
TabOrder = 8
Text = 'Petinfo_Edit15'
end
end
end
end
object ADOConnection1: TADOConnection
Connected = True
ConnectionString =
'Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initi' +
'al Catalog=pethospital;Data Source=.'
Provider = 'SQLOLEDB.1'
Left = 400
Top = 360
end
object ADOQuery1: TADOQuery
Connection = ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from PetTable')
Left = 464
Top = 352
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 496
Top = 360
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -