unit1.dfm

加密算法,非常好的,值得看啊,太好不过,很好 很好很好很好很好

object Form1: TForm1
  Left = 227
  Top = 114
  Width = 696
  Height = 480
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label2: TLabel
    Left = 40
    Top = 8
    Width = 177
    Height = 13
    AutoSize = False
    Caption = #25668#20687#22836#39537#21160#32534#21495'('#19968#33324#26159'0)'
  end
  object VideoCap1: TVideoCap
    Left = 32
    Top = 72
    Width = 281
    Height = 337
    color = clBlack
    DriverOpen = False
    DriverIndex = 1
    DriverName = 'Luminositi Softcam [VFW]'
    VideoOverlay = False
    VideoPreview = False
    PreviewScaleToWindow = False
    PreviewScaleProportional = False
    PreviewRate = 30
    MicroSecPerFrame = 66667
    FrameRate = 15
    CapAudio = False
    VideoFileName = 'Video.avi'
    SingleImageFile = 'Capture.bmp'
    CapTimeLimit = 0
    CapIndexSize = 0
    CapToFile = True
    BufferFileSize = 0
  end
  object ACMWaveIn1: TACMWaveIn
    Left = 392
    Top = 32
    Width = 32
    Height = 32
  end
  object Button1: TButton
    Left = 336
    Top = 96
    Width = 121
    Height = 41
    Caption = #20135#29983#20449#24687#25991#20214
    TabOrder = 2
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 336
    Top = 152
    Width = 121
    Height = 41
    Caption = #24320#22987#21457#36865
    TabOrder = 3
    OnClick = Button2Click
  end
  object Edit1: TEdit
    Left = 192
    Top = 8
    Width = 121
    Height = 21
    TabOrder = 4
    Text = '0'
  end
  object Memo1: TMemo
    Left = 344
    Top = 200
    Width = 297
    Height = 217
    Lines.Strings = (
      #31532#19968#27425#36816#34892#31243#24207#30340#26102#20505#65292#38656#35201#20135#29983#20004#20010#35760#24405
      #20449#24687#30340#25991#20214#65292#23601#26159#21387#32553#22120#30340#30456#20851#20449#24687#65292#19968#20010
      #26159'comp.dat,'#19968#20010#26159'Begin.dat '#36825#20004#20010#25991#20214
      #22312#35299#21387#31471#38656#35201#65292#35831#23558#36825#20004#20010#25991#20214#20135#29983#21518#25335#21040
      #25509#25910#31471#31243#24207#30446#24405#19979#65292#31532#20108#27425#36816#34892#26102#65292#23601#19981#29992
      #20877#20135#29983#20449#24687#25991#20214#20102#65292#30452#25509#24320#22987#21457#36865#21363#21487#65292#25509
      #25910#31471#21487#21453#22797#24320#21551#12290#21387#32553#22120#26377#30340#19981#33021#29992#12290
      '(divx '#26377#19968#20010#29256#26412#21487#20197#29992#65292#25105#26426#22120'divx'#26377#38382#39064
      #20102#65292#27809#27979#20986#26469')'
      #24314#35758#20351#29992'ligos indeo? xp video 5.2'#36825#20010#65292
      #21387#32553#27604#35843#21040'30-70'#24038#21491#37117#27809#38382#39064#65292
      #22312#26292#39118#24433#38899#37324#38754#26377#12290#22914#26524#27809#26377#35831#35013#26292#39118#20854#20013#32452#25773#29256
      #21644#22810#32447#31243#29256#27491#22312#24320#21457#20013#65292#22810#36825#20010#21333#32447#31243#29256#26377
      #30340#26102#20505#21487#33021#20250#26377#28857#33457#23631#65292#22810#32447#31243#29256#21487#20197#36798#21040
      'DVD'#32423#20256#36755#65292#19981#20250#33457#12290)
    TabOrder = 5
  end
  object SendVideo1: TSendVideo
    VideoCap = VideoCap1
    ACMIn = ACMWaveIn1
    VideoUDPClient = IdUDPClient1
    VideoWork = False
    AudioWork = False
    Left = 272
    Top = 40
  end
  object IdUDPClient1: TIdUDPClient
    Active = True
    Host = '127.0.0.1'
    Port = 8889
    Left = 304
    Top = 40
  end
end