object Form1: TForm1 Left = 191 Top = 176 BorderStyle = bsDialog Caption = 'Video capture demo - www.ImageEn.com' ClientHeight = 494 ClientWidth = 650 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] OldCreateOrder = True OnActivate = FormActivate PixelsPerInch = 96 TextHeight = 13 object Label8: TLabel Left = 8 Top = 432 Width = 9 Height = 13 Caption = '...' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False end object GroupBox1: TGroupBox Left = 10 Top = 0 Width = 353 Height = 329 TabOrder = 0 object SpeedButton2: TSpeedButton Left = 12 Top = 11 Width = 25 Height = 25 AllowAllUp = True GroupIndex = 1 Caption = 'ON' OnClick = SpeedButton2Click end object Label5: TLabel Left = 64 Top = 24 Width = 51 Height = 13 Caption = 'Video size:' end object Label6: TLabel Left = 120 Top = 24 Width = 28 Height = 13 Caption = '-------' end object CheckBox1: TCheckBox Left = 184 Top = 17 Width = 65 Height = 17 Caption = 'Overlay' TabOrder = 0 OnClick = CheckBox1Click end object ImageEnVideoView1: TImageEnVideoView Left = 10 Top = 42 Width = 335 Height = 279 Background = clSilver ParentCtl3D = False MouseInteract = [miZoom, miSelect] EnableInteractionHints = True TabOrder = 1 OnJob = ImageEnVideoView1Job end end object GroupBox2: TGroupBox Left = 377 Top = 0 Width = 257 Height = 265 TabOrder = 1 object Label1: TLabel Left = 8 Top = 16 Width = 80 Height = 13 Caption = 'Processed image' end object ImageEnView1: TImageEnView Left = 8 Top = 40 Width = 241 Height = 217 ParentCtl3D = False EnableInteractionHints = True TabOrder = 0 end end object GroupBox3: TGroupBox Left = 313 Top = 334 Width = 321 Height = 95 Caption = ' Movie capture ' TabOrder = 2 object SpeedButton6: TSpeedButton Left = 169 Top = 54 Width = 137 Height = 19 AllowAllUp = True GroupIndex = 4 Caption = 'Record' OnClick = SpeedButton6Click end object Label2: TLabel Left = 16 Top = 22 Width = 47 Height = 13 Caption = 'FileName:' end object Label3: TLabel Left = 168 Top = 24 Width = 57 Height = 13 Caption = 'FrameRate:' end object Button8: TButton Left = 16 Top = 48 Width = 82 Height = 25 Caption = 'Compression...' TabOrder = 0 OnClick = Button8Click end object Edit1: TEdit Left = 69 Top = 19 Width = 84 Height = 21 TabOrder = 1 end object Edit2: TEdit Left = 229 Top = 21 Width = 22 Height = 21 TabOrder = 2 Text = '0' end object UpDown1: TUpDown Left = 251 Top = 21 Width = 16 Height = 21 Associate = Edit2 TabOrder = 3 end end object GroupBox4: TGroupBox Left = 10 Top = 338 Width = 289 Height = 83 Caption = ' Configure ' TabOrder = 3 object Label9: TLabel Left = 6 Top = 53 Width = 57 Height = 13 Caption = 'Video input:' end object Button5: TButton Left = 10 Top = 16 Width = 71 Height = 25 Caption = 'Source...' TabOrder = 0 OnClick = Button5Click end object Button6: TButton Left = 85 Top = 16 Width = 68 Height = 25 Caption = 'Format...' TabOrder = 1 OnClick = Button6Click end object Button7: TButton Left = 160 Top = 16 Width = 72 Height = 25 Caption = 'Display...' TabOrder = 2 OnClick = Button7Click end object ComboBox2: TComboBox Left = 68 Top = 51 Width = 205 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 3 OnChange = ComboBox2Change end end object GroupBox5: TGroupBox Left = 9 Top = 430 Width = 288 Height = 46 Caption = ' Commands ' TabOrder = 4 object SpeedButton1: TSpeedButton Left = 4 Top = 15 Width = 51 Height = 25 AllowAllUp = True GroupIndex = 5 Caption = 'Freeze' OnClick = SpeedButton1Click end object Button1: TButton Left = 58 Top = 15 Width = 65 Height = 25 Caption = 'Color adj...' TabOrder = 0 OnClick = Button1Click end object Button2: TButton Left = 123 Top = 15 Width = 65 Height = 25 Caption = 'Effects...' TabOrder = 1 OnClick = Button2Click end object Button11: TButton Left = 191 Top = 15 Width = 56 Height = 25 Caption = 'Save as...' TabOrder = 2 OnClick = Button11Click end end object GroupBox6: TGroupBox Left = 376 Top = 273 Width = 258 Height = 57 Caption = ' Image processing ' TabOrder = 5 object SpeedButton5: TSpeedButton Left = 8 Top = 20 Width = 105 Height = 25 AllowAllUp = True GroupIndex = 3 Caption = 'Activate' OnClick = SpeedButton5Click end object Label7: TLabel Left = 128 Top = 25 Width = 16 Height = 13 Caption = 'op:' end object ComboBox1: TComboBox Left = 157 Top = 20 Width = 78 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 0 Items.Strings = ( 'Equal' 'Dither1' 'Dither2' 'Gray') end end object ImageEnProc1: TImageEnProc AttachedImageEn = ImageEnVideoView1 Background = clSilver PreviewsParams = [prppDefaultLockPreview] PreviewFont.Charset = DEFAULT_CHARSET PreviewFont.Color = clWindowText PreviewFont.Height = -11 PreviewFont.Name = 'Tahoma' PreviewFont.Style = [] Left = 64 Top = 56 end object ImageEnProc2: TImageEnProc AttachedImageEn = ImageEnView1 Background = clBtnFace PreviewsParams = [prppDefaultLockPreview] PreviewFont.Charset = DEFAULT_CHARSET PreviewFont.Color = clWindowText PreviewFont.Height = -11 PreviewFont.Name = 'Tahoma' PreviewFont.Style = [] Left = 307 Top = 48 end object ImageEnIO1: TImageEnIO AttachedImageEn = ImageEnVideoView1 Background = clSilver PreviewFont.Charset = DEFAULT_CHARSET PreviewFont.Color = clWindowText PreviewFont.Height = -11 PreviewFont.Name = 'Tahoma' PreviewFont.Style = [] Left = 192 Top = 56 end object SaveImageEnDialog1: TSaveImageEnDialog Filter = 'All graphics|*.jpg;*.jpeg;*.gif;*.tif;*.tiff;*.pcx;*.png;*.bmp;*' + '.wmf;*.emf;*.ico;*.cur|JPEG files (*.jpg;*.jpeg)|*.jpg;*.jpeg|GI' + 'F files (*.gif)|*.gif|TIFF files (*.tif;*.tiff)|*.tif;*.tiff|PCX' + ' files (*.pcx)|*.pcx|PNG files (*.png)|*.png|BMP files (*.bmp)|*' + '.bmp|WMF files (*.wmf)|*.wmf|EMF files (*.emf)|*.emf|ICO files (' + '*.ico)|*.ico|CUR files (*.cur)|*.cur' ExOptions = [sdShowAdvanced] AttachedImageEnIO = ImageEnIO1 Left = 68 Top = 132 end end