📄 unit1.~dfm
字号:
object frmPetinfo: TfrmPetinfo
Left = 221
Top = 82
Width = 665
Height = 482
Caption = #23456#29289#20449#24687#31649#29702
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object PageControl1: TPageControl
Left = 0
Top = 0
Width = 657
Height = 455
ActivePage = frmPetinfo_zcq_TabSheet1
Align = alClient
TabIndex = 0
TabOrder = 0
object frmPetinfo_zcq_TabSheet1: TTabSheet
Caption = #23456#29289#20449#24687#26597#35810
object Panel1: TPanel
Left = 0
Top = 0
Width = 265
Height = 427
Align = alLeft
Caption = 'Panel1'
TabOrder = 0
object GroupBox1: TGroupBox
Left = 1
Top = 1
Width = 263
Height = 263
Align = alTop
Caption = #26465#20214#26597#35810
TabOrder = 0
object Petinfo_xxcx_sh: TSpeedButton
Left = 16
Top = 223
Width = 73
Height = 25
Caption = #26597#35810'>>'
OnClick = Petinfo_xxcx_shClick
end
object Petinfo_xxcx_del: TSpeedButton
Left = 91
Top = 223
Width = 78
Height = 26
Caption = #21024#38500'>>'
OnClick = Petinfo_xxcx_delClick
end
object SpeedButton3: TSpeedButton
Left = 176
Top = 224
Width = 73
Height = 25
Caption = #20462#25913'>>'
OnClick = SpeedButton3Click
end
object Petinfo_CheckBox1: TCheckBox
Left = 16
Top = 24
Width = 97
Height = 17
Caption = #23456#29289#21495#30721
TabOrder = 0
OnClick = Petinfo_CheckBox1Click
end
object Petinfo_CheckBox2: TCheckBox
Left = 16
Top = 64
Width = 97
Height = 17
Caption = #23456#29289#21517#31216
TabOrder = 1
OnClick = Petinfo_CheckBox2Click
end
object Petinfo_CheckBox3: TCheckBox
Left = 16
Top = 104
Width = 97
Height = 17
Caption = #23456#29289#31181#31867
TabOrder = 2
end
object Petinfo_CheckBox4: TCheckBox
Left = 16
Top = 144
Width = 97
Height = 17
Caption = #23456#29289#29366#24577
TabOrder = 3
end
object Petinfo_CheckBox5: TCheckBox
Left = 16
Top = 184
Width = 97
Height = 17
Caption = #27880#20876#26085#26399
TabOrder = 4
end
object frmPetinfo_Petinfo_DateTimePicker1: TDateTimePicker
Left = 104
Top = 184
Width = 121
Height = 21
CalAlignment = dtaLeft
Date = 38229.8238064236
Time = 38229.8238064236
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 5
end
object frmPetinfo_DBEdit1: TEdit
Left = 104
Top = 24
Width = 121
Height = 21
TabOrder = 6
end
object frmPetinfo_DBEdit2: TEdit
Left = 104
Top = 64
Width = 121
Height = 21
TabOrder = 7
end
object frmPetinfo_DBComboBox1: TComboBox
Left = 104
Top = 104
Width = 121
Height = 21
ItemHeight = 13
TabOrder = 8
Items.Strings = (
#29399
#29483
#40736
#40479
#29275
#39532)
end
object frmPetinfo_DBComboBox2: TComboBox
Left = 104
Top = 144
Width = 121
Height = 21
ItemHeight = 13
TabOrder = 9
Items.Strings = (
'True'
'False')
end
end
object GroupBox5: TGroupBox
Left = 1
Top = 264
Width = 263
Height = 162
Align = alClient
Caption = #29305#27530#26465#20214#26597#35810
TabOrder = 1
object SpeedButton4: TSpeedButton
Left = 184
Top = 128
Width = 73
Height = 25
Caption = #36820#22238'<<'
OnClick = SpeedButton4Click
end
object Label19: TLabel
Left = 24
Top = 22
Width = 63
Height = 13
Caption = #35786#25152#21495#30721' '
end
object Label20: TLabel
Left = 24
Top = 64
Width = 60
Height = 13
Caption = #23456#29289#24635#37327' '
end
object SpeedButton1: TSpeedButton
Left = 24
Top = 128
Width = 57
Height = 22
Caption = #25191#34892'>>'
OnClick = SpeedButton1Click
end
object Petinfo_Edit100: TEdit
Left = 104
Top = 64
Width = 121
Height = 21
TabOrder = 0
end
object Petinfo_DBComboBox100: TComboBox
Left = 104
Top = 16
Width = 121
Height = 21
ItemHeight = 13
TabOrder = 1
Text = 'Petinfo_DBComboBox100'
end
end
end
object Panel2: TPanel
Left = 265
Top = 0
Width = 384
Height = 427
Align = alClient
Caption = 'Panel2'
TabOrder = 1
object GroupBox2: TGroupBox
Left = 1
Top = 1
Width = 382
Height = 425
Align = alClient
Caption = #26597#35810#32467#26524
TabOrder = 0
object DBGrid1: TDBGrid
Left = 2
Top = 15
Width = 378
Height = 408
Align = alClient
DataSource = DataSource1
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'PetId'
Title.Caption = #23456#29289#21495#30721
Visible = True
end
item
Expanded = False
FieldName = 'PetName'
Title.Caption = #23456#29289#21517#31216
Visible = True
end
item
Expanded = False
FieldName = 'PetType'
Title.Caption = #23456#29289#31181#31867
Visible = True
end
item
Expanded = False
FieldName = 'PetState'
Title.Caption = #23456#29289#29366#24577
Visible = True
end
item
Expanded = False
FieldName = 'RegisterDate'
Title.Caption = #27880#20876#26085#26399
Visible = True
end
item
Expanded = False
FieldName = 'PetBirth'
Title.Caption = #20986#29983#26085#26399
Visible = True
end>
end
end
end
end
object Petinfo_TabSheet2: TTabSheet
Caption = #23456#29289#20449#24687#20462#25913
ImageIndex = 1
object Panel3: TPanel
Left = 0
Top = 0
Width = 649
Height = 427
Align = alClient
Caption = 'Panel3'
TabOrder = 0
object GroupBox3: TGroupBox
Left = 1
Top = 1
Width = 647
Height = 425
Align = alClient
Caption = #23456#29289#20449#24687#20462#25913
TabOrder = 0
object Label1: TLabel
Left = 48
Top = 27
Width = 57
Height = 13
Caption = #23456#29289#21495#30721' '
end
object Label2: TLabel
Left = 48
Top = 68
Width = 57
Height = 13
Caption = #23456#29289#21517#31216' '
end
object Label3: TLabel
Left = 48
Top = 109
Width = 57
Height = 13
Caption = #23456#29289#31181#31867' '
end
object Label4: TLabel
Left = 48
Top = 151
Width = 57
Height = 13
Caption = #35786#25152#21495#30721' '
end
object Label5: TLabel
Left = 48
Top = 192
Width = 57
Height = 13
Caption = #20986#29983#26085#26399' '
end
object Label6: TLabel
Left = 48
Top = 234
Width = 57
Height = 13
Caption = #23456#29289#29366#24577' '
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -