📄 u7_5.~dfm
字号:
object Form1: TForm1
Left = 189
Top = 110
Width = 587
Height = 515
Caption = 'Form1'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 16
Top = 24
Width = 37
Height = 13
Caption = 'Name:'
end
object Label2: TLabel
Left = 16
Top = 72
Width = 29
Height = 13
Caption = 'Size:'
end
object Label3: TLabel
Left = 16
Top = 120
Width = 45
Height = 13
Caption = 'Weight:'
end
object Label4: TLabel
Left = 16
Top = 168
Width = 31
Height = 13
Caption = 'Area:'
end
object Button1: TButton
Left = 16
Top = 256
Width = 75
Height = 25
Caption = 'First'
TabOrder = 0
OnClick = Button1Click
end
object Button2: TButton
Left = 136
Top = 256
Width = 75
Height = 25
Caption = 'Prior'
TabOrder = 1
OnClick = Button2Click
end
object Button3: TButton
Left = 16
Top = 312
Width = 75
Height = 25
Caption = 'Last'
TabOrder = 2
OnClick = Button3Click
end
object Button4: TButton
Left = 136
Top = 312
Width = 75
Height = 25
Caption = 'Next'
TabOrder = 3
OnClick = Button4Click
end
object Button5: TButton
Left = 16
Top = 368
Width = 75
Height = 25
Caption = 'Insert'
TabOrder = 4
OnClick = Button5Click
end
object Button6: TButton
Left = 136
Top = 368
Width = 75
Height = 25
Caption = 'Delete'
TabOrder = 5
OnClick = Button6Click
end
object Button7: TButton
Left = 16
Top = 424
Width = 75
Height = 25
Caption = 'Open'
TabOrder = 6
OnClick = Button7Click
end
object Button8: TButton
Left = 136
Top = 424
Width = 75
Height = 25
Caption = 'Close'
TabOrder = 7
OnClick = Button8Click
end
object DBChart1: TDBChart
Left = 232
Top = 256
Width = 337
Height = 217
AllowPanning = pmNone
AllowZoom = False
BackWall.Brush.Color = clWhite
BackWall.Brush.Style = bsClear
BackWall.Color = clWhite
BackWall.Pen.Width = 3
BackWall.Pen.Visible = False
BottomWall.Pen.Width = 3
BottomWall.Pen.Visible = False
Foot.Text.Strings = (
'char')
LeftWall.Color = clWhite
LeftWall.Pen.Visible = False
Title.Text.Strings = (
'TDBChart')
AxisVisible = False
BackColor = clWhite
ClipPoints = False
Frame.Width = 3
Frame.Visible = False
MaxPointsPerPage = 2
View3DOptions.Elevation = 315
View3DOptions.Orthogonal = False
View3DOptions.Perspective = 0
View3DOptions.Rotation = 360
View3DWalls = False
TabOrder = 12
object Series1: TPieSeries
Marks.ArrowLength = 8
Marks.Visible = False
DataSource = Table1
SeriesColor = clRed
XLabelsSource = 'NAME'
OtherSlice.Text = 'Other'
PieValues.DateTime = False
PieValues.Name = 'Pie'
PieValues.Multiplier = 1
PieValues.Order = loNone
PieValues.ValueSource = 'SIZE'
end
end
object DBEdit1: TDBEdit
Left = 88
Top = 24
Width = 121
Height = 21
DataField = 'NAME'
DataSource = DataSource1
TabOrder = 8
end
object DBEdit2: TDBEdit
Left = 88
Top = 72
Width = 121
Height = 21
DataField = 'SIZE'
DataSource = DataSource1
TabOrder = 9
end
object DBEdit3: TDBEdit
Left = 88
Top = 120
Width = 121
Height = 21
DataField = 'WEIGHT'
DataSource = DataSource1
TabOrder = 10
end
object DBEdit4: TDBEdit
Left = 88
Top = 168
Width = 121
Height = 21
DataField = 'AREA'
DataSource = DataSource1
TabOrder = 11
end
object DBImage1: TDBImage
Left = 232
Top = 8
Width = 337
Height = 241
DataField = 'BMP'
DataSource = DataSource1
TabOrder = 13
end
object DataSource1: TDataSource
DataSet = Table1
Left = 80
Top = 208
end
object Table1: TTable
Active = True
DatabaseName = 'BCDEMOS'
TableName = 'animals.dbf'
Left = 112
Top = 208
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -