unit_frmmain.dfm

一个关于Delphi获取摄像头视频的例子

object FrmMain: TFrmMain
  Left = 192
  Top = 107
  AutoScroll = False
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = 'FrmMain'
  ClientHeight = 200
  ClientWidth = 465
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel
    Left = 56
    Top = 16
    Width = 300
    Height = 12
    Caption = 'Usb'#25668#20687#22836#20599#31397#32456#32467#32773'0.5-For Win9X/NT/2000/XP/VISTA.'
    Transparent = True
  end
  object Bevel1: TBevel
    Left = 32
    Top = 40
    Width = 417
    Height = 9
    Shape = bsTopLine
    Style = bsRaised
  end
  object Label2: TLabel
    Left = 48
    Top = 148
    Width = 132
    Height = 12
    Cursor = crHandPoint
    Hint = #35775#38382#34255#40120#38401#20027#39029
    Caption = 'http://www.138soft.com'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = [fsUnderline]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    OnClick = Label2Click
  end
  object Label3: TLabel
    Left = 280
    Top = 148
    Width = 132
    Height = 12
    Cursor = crHandPoint
    Hint = #35775#38382#34255#40120#38401#23454#39564#23460#20027#39029
    Caption = 'http://www.138soft.org'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = [fsUnderline]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    OnClick = Label3Click
  end
  object Memo1: TMemo
    Left = 16
    Top = 56
    Width = 425
    Height = 73
    BevelInner = bvNone
    BevelOuter = bvNone
    BorderStyle = bsNone
    Color = clBtnFace
    Lines.Strings = (
      '    '#25429#33719#25668#20687#22836#26377#20004#31181#26041#24335','#19968#31181#26159#22522#20110'Vfw'#25509#21475','#19968#31181#26159#22522#20110'Direct.'#30446#21069'99.99%'
      #30340#26408#39532#37117#26159#20351#29992'Vfw.'#26412#31243#24207#20027#35201#26159#30417#27979'Vfw'#25509#21475'.'#24403#26377#31243#24207#24847#22270#21019#24314#35270#39057#31383#21475','
      #26412#31243#24207#23558#20250#35810#38382#29992#25143#26159#21542#20801#35768#35813#31243#24207#25805#20316#25668#20687#22836'.'
      '    '#26412#31243#24207#36816#34892#30340#26102#20505','#20250#37322#25918#19968#20010'Dll'#25991#20214#21040#31243#24207#30340#24403#21069#30446#24405'.'
      '    '#29992#25143#21487#20197#25226#26412#31243#24207#25335#36125#21040'"'#24320#22987'"--->"'#21551#21160'"'#30446#24405#19979#35753#20854#27599#27425#24320#26426#21518#36816#34892'.')
    ReadOnly = True
    TabOrder = 0
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 181
    Width = 465
    Height = 19
    Panels = <>
    SimplePanel = True
    SimpleText = #38472#32463#38892#20316#21697'.2006.12.26.'
  end
  object PopupMenu1: TPopupMenu
    Left = 280
    Top = 80
    object ShowWindow1: TMenuItem
      Caption = #26174#31034'[&S]'
      Default = True
      OnClick = ShowWindow1Click
    end
    object HideWindow1: TMenuItem
      Caption = #38544#34255'[&H]'
      OnClick = HideWindow1Click
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object Exit1: TMenuItem
      Caption = #36864#20986'[&E]'
      OnClick = Exit1Click
    end
  end
  object CoolTrayIcon1: TCoolTrayIcon
    CycleInterval = 0
    Icon.Data = {
      0000010001002020040000000000E80200001600000028000000200000004000
      0000010004000000000000020000000000000000000000000000000000000000
      000000008000008000000080800080000000800080008080000080808000C0C0
      C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00C00C0000000000000000000000000C00CC0CC0C0000000000000000000000C
      C00C0CC0CCC000C40000003B00000C00C00000C0CCC000CCCC00BBBB00000C00
      0000000000C000CCCC00BBBB0000000000000000000000CCCC00BBBB00000000
      00000000000000CCCC00BBBB000000000000000000000004CC00BB3000000000
      0090090000000000000000000000000900990990900000000000000000000009
      90090990999000910000002A0000090090000090999000999900AAAA00000900
      00000000009000999900AAAA0000000000000000000000999900AAAA00000000
      00000000000000999900AAAA0000000000000000000000019900AA2000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000000000000000000000FFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFDBFFFFFEC97FFFFE6913FF3B7D10FC3BDBD
      0003EC970003E6910003B7D10003BDBD0003EC970003E6910003B7D10003BDBD
      0003EC970003E6910003B7D10003BDBD0003EC970003E6910003B7D10003BFFD
      0003FFFF8007FFFFE01FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
    IconIndex = 0
    PopupMenu = PopupMenu1
    Left = 248
    Top = 80
  end
end