📄 camerafrm.dfm
字号:
object CameraForm: TCameraForm
Left = 0
Top = 0
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = #29031#30456#31383#21475
ClientHeight = 285
ClientWidth = 445
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = True
Position = poDesktopCenter
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object pnlBase: TPanel
Left = 9
Top = 9
Width = 341
Height = 265
BevelOuter = bvLowered
TabOrder = 0
object imgPicture: TImage
Left = 1
Top = 1
Width = 339
Height = 263
Align = alClient
OnMouseDown = imgPictureMouseDown
OnMouseMove = imgPictureMouseMove
end
object pnlPicture: TPanel
Left = 1
Top = 1
Width = 339
Height = 263
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 0
object pnlArea: TPanel
Left = 2
Top = 2
Width = 335
Height = 259
Align = alClient
TabOrder = 0
ExplicitLeft = 4
ExplicitTop = 18
end
end
end
object btnOk: TcxButton
Left = 355
Top = 195
Width = 82
Height = 30
Caption = #30830' '#23450
TabOrder = 1
OnClick = btnOkClick
LookAndFeel.Kind = lfOffice11
end
object btnCancel: TcxButton
Left = 355
Top = 241
Width = 82
Height = 30
Cancel = True
Caption = #21462' '#28040
ModalResult = 2
TabOrder = 2
OnClick = btnCancelClick
LookAndFeel.Kind = lfOffice11
end
object btnTake: TcxButton
Left = 355
Top = 56
Width = 82
Height = 31
Caption = #25293' '#29031
TabOrder = 3
OnClick = btnTakeClick
LookAndFeel.Kind = lfOffice11
end
object btnReLoad: TcxButton
Left = 355
Top = 12
Width = 82
Height = 30
Caption = #37325#26032#21462#26448
TabOrder = 4
OnClick = btnReLoadClick
LookAndFeel.Kind = lfOffice11
end
object SaveDialog: TSaveDialog
DefaultExt = '.bmp'
Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
Left = 368
Top = 104
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -