object Form1: TForm1 Left = 0 Top = 0 BorderIcons = [biSystemMenu, biMinimize] Caption = 'Veo View by Dmitry Brant' ClientHeight = 424 ClientWidth = 498 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] OldCreateOrder = False OnClose = FormClose DesignSize = ( 498 424) PixelsPerInch = 96 TextHeight = 13 object sbGrippy: TScrollBar Left = 482 Top = 408 Width = 16 Height = 16 Anchors = [akRight, akBottom] Ctl3D = False PageSize = 0 ParentCtl3D = False TabOrder = 14 TabStop = False end object txtAddress: TLabeledEdit Left = 80 Top = 8 Width = 89 Height = 21 EditLabel.Width = 56 EditLabel.Height = 13 EditLabel.Caption = 'IP Address:' LabelPosition = lpLeft TabOrder = 0 end object cmdConnect: TButton Left = 175 Top = 35 Width = 74 Height = 22 Caption = '&Connect' TabOrder = 1 OnClick = cmdConnectClick end object cmdDisconnect: TButton Left = 175 Top = 62 Width = 74 Height = 21 Caption = '&Disconnect' Enabled = False TabOrder = 2 OnClick = cmdDisconnectClick end object txtPort: TLabeledEdit Left = 207 Top = 8 Width = 42 Height = 21 EditLabel.Width = 24 EditLabel.Height = 13 EditLabel.Caption = 'Port:' LabelPosition = lpLeft TabOrder = 3 Text = '1600' end object txtUser: TLabeledEdit Left = 80 Top = 35 Width = 89 Height = 21 EditLabel.Width = 26 EditLabel.Height = 13 EditLabel.Caption = 'User:' LabelPosition = lpLeft TabOrder = 4 Text = 'admin' end object txtPass: TLabeledEdit Left = 80 Top = 62 Width = 89 Height = 21 EditLabel.Width = 50 EditLabel.Height = 13 EditLabel.Caption = 'Password:' LabelPosition = lpLeft TabOrder = 5 Text = 'password' end object GroupBox1: TGroupBox Left = 273 Top = 7 Width = 102 Height = 76 Caption = 'Move Camera' TabOrder = 6 object btnMoveUp: TButton Left = 39 Top = 21 Width = 25 Height = 23 Caption = 'U' TabOrder = 0 OnClick = btnMoveUpClick end object btnMoveLeft: TButton Tag = 4 Left = 13 Top = 33 Width = 25 Height = 23 Caption = 'L' TabOrder = 1 OnClick = btnMoveUpClick end object btnMoveRight: TButton Tag = 6 Left = 65 Top = 33 Width = 25 Height = 23 Caption = 'R' TabOrder = 2 OnClick = btnMoveUpClick end object btnMoveDown: TButton Tag = 2 Left = 39 Top = 44 Width = 25 Height = 23 Caption = 'D' TabOrder = 3 OnClick = btnMoveUpClick end end object GroupBox2: TGroupBox Left = 381 Top = 7 Width = 100 Height = 76 Caption = 'Status Light' TabOrder = 7 object btnStatusOn: TButton Tag = 1 Left = 15 Top = 21 Width = 33 Height = 23 Caption = 'On' TabOrder = 0 OnClick = btnStatusOnClick end object btnStatusOff: TButton Left = 54 Top = 21 Width = 33 Height = 23 Caption = 'Off' TabOrder = 1 OnClick = btnStatusOnClick end end object GroupBox3: TGroupBox Left = 8 Top = 89 Width = 102 Height = 112 Caption = 'Stream Select' TabOrder = 8 object btnStreamSelect1: TButton Left = 12 Top = 20 Width = 78 Height = 23 Caption = '160x120' TabOrder = 0 OnClick = btnStreamSelect1Click end object btnStreamSelect2: TButton Tag = 1 Left = 12 Top = 49 Width = 78 Height = 23 Caption = '320x240' TabOrder = 1 OnClick = btnStreamSelect1Click end object btnStreamSelect3: TButton Tag = 2 Left = 12 Top = 78 Width = 78 Height = 23 Caption = '640x480' TabOrder = 2 OnClick = btnStreamSelect1Click end end object GroupBox4: TGroupBox Left = 8 Top = 255 Width = 97 Height = 82 Caption = 'Stream Control' TabOrder = 9 object btnStreamStart: TButton Left = 9 Top = 20 Width = 78 Height = 23 Caption = 'Start' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnClick = btnStreamStartClick end object btnStreamStop: TButton Left = 9 Top = 49 Width = 78 Height = 23 Caption = 'Stop' Enabled = False TabOrder = 1 OnClick = btnStreamStopClick end end object btnReset: TButton Left = 8 Top = 393 Width = 65 Height = 23 Caption = 'Reset' TabOrder = 10 OnClick = btnResetClick end object GroupBox5: TGroupBox Left = 116 Top = 89 Width = 374 Height = 327 Anchors = [akLeft, akTop, akRight, akBottom] Caption = 'Image Stream' TabOrder = 11 DesignSize = ( 374 327) object PaintBox1: TPaintBox Left = 7 Top = 18 Width = 360 Height = 302 Anchors = [akLeft, akTop, akRight, akBottom] ExplicitWidth = 440 ExplicitHeight = 226 end end object Button1: TButton Left = 8 Top = 343 Width = 102 Height = 23 Caption = 'Snapshot...' TabOrder = 12 OnClick = Button1Click end object GroupBox6: TGroupBox Left = 8 Top = 207 Width = 102 Height = 42 Caption = 'Brightness' TabOrder = 13 object tbBrightness: TTrackBar Left = 3 Top = 16 Width = 96 Height = 21 ShowSelRange = False TabOrder = 0 ThumbLength = 14 OnChange = tbBrightnessChange end end object XPManifest1: TXPManifest Left = 16 Top = 8 end object Timer1: TTimer Enabled = False Interval = 1 OnTimer = Timer1Timer Left = 248 Top = 8 end end