Delphi控件源码

开发平台：
Delphi

USWFList.dfm：源码内容
							object Form1: TForm1
  Left = 230
  Top = 134
  Width = 345
  Height = 239
  Caption = 'ShockwaveFlashList Demo'
  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 SpeedButton1: TSpeedButton
    Left = 208
    Top = 172
    Width = 53
    Height = 22
    Caption = 'Play'
    OnClick = SpeedButton1Click
  end
  object SpeedButton2: TSpeedButton
    Left = 264
    Top = 172
    Width = 53
    Height = 22
    Caption = 'Stop'
    OnClick = SpeedButton2Click
  end
  object ShockwaveFlashList1: TShockwaveFlashList
    Left = 4
    Top = 4
    Width = 192
    Height = 192
    PopupMenu = PopupMenu1
    Items = <
      item
        FileName = 'D:_webDFflashdemo_1.swf'
        SWF = TSWFChildren886
      end
      item
        FileName = 'c:demo1.swf'
        SWF = TSWFChildren268
      end
      item
        FileName = 'D:_webDFflashdemo_7.swf'
        SWF = TSWFChildren251
      end>
    Playing = True
    MoviesWidth = 20
    MoviesHeight = 20
    Gleam = 2
    object TSWFChildren886: TSWFChildren
      Left = 2
      Top = 2
      Width = 188
      Height = 188
      TabOrder = 0
      Host = ShockwaveFlashList1
      ControlData = {
        665566558D050000465753068D05000070000FA00000FA00000C36003F085300
        00000100600029E00006400110B54F0190816A78320002005AC109ABFFFFFFFF
        FF00102D88E8141A34C052FC0028BF000D33EC9E99EC0076270076169ECA0B4F
        B1040028410002D0149D6814000A27000A298140008A0606010001001A8C05AA
        00400040003F08550000000200600017C00027600110B10C9BD6C90B432597C4
        EC0200C5EBB28FFFFFFFFFFF00102D85008499F38B4BA0027BA003394CA39CD3
        000BF28002FC1934C9CC94C46002746000C8B4A0642D000412800104E70B4000
        8A0606020002001AC582BC00400040003F0855000000030060002260003D4001
        1082D85822616899EA000200450E652FFFFFFFFFFF00102D8730CF9A36046324
        0028C9000D82E8A360BA0009C2800270282E8A0A0BA0DC00283700028118A0A0
        46000642800190D81180008A0606030003001A8FC1FE00400040003F085B0000
        000400600022600026200110B51309888168993100040037BFC75455FFFFFFFF
        AA37BFC754FF000000FF00102D87308219EC0A092002792002C1609EC1600044
        270044141609D41606E00276E00140A09D40A0003C27003C2C0A00008A060604
        0004001AE9C71C00400040004000400040004000400040004000400040004000
        3F085F0000000500600039800028A00110B5CC0A28816E61450004003C30125D
        55FFFFFFFFAA3C30125DFF000000FF00102D8C30899A2FC2D2840028A1000BF3
        4CA2FCD3000BF28002FC4134CA104D317C00285F000410B4A1042D0004128001
        04BF0B40008A0606050005001A0145E600400040003F0859000000060068000A
        28000762000112B8A287620C28A7620200351DC604FFFFFFFFFF00102DA44C64
        A69E988737E000A77E000E997929E99790004F4A4004F4169792916979082000
        A48200016887291688700030CA40030CE98870008A0606060006001A8480AA00
        400040003F0859000000070068001E280003AC000112B9E283AC0C78A3AC0200
        8D534D37FFFFFFFFFF00102DACD032069BA04127A000A67A000BA1BF29BA1BF0
        00684A400684461BF29461BF186000A58600046041294604100017CA40017CBA
        0410008A0606070007001AE4C2120040004000020701003F0852000000080060
        002940001A400112B54A069029CE49800200FFFFFFFFFFDDC44DFE00102D88C0
        579A34C1E2FC0028BF000D33889E9988005827005816988A0B4E210400284100
        02D0789D68780028270028298780008A0606080008001AD0C1EA004000400002
        07020040004000400040004000400040004000400040003F0854000000090068
        00075800056E000112B875856E000200D228E178FFFFFFFFFF00102DA32049C6
        8E2190D3000A34C003889C29F119C0005D0A4005D00F19C281E2702D000A0B40
        007864290F064000230A400230F10640008906060900090018BE0CD040004000
        020703003F08590000000A0068000780000712000112B87807120B240B500200
        73309BD6FFFFFFFFFF00102DA32060469EE8823A6000A7A6000EE97E29EE97E0
        0051CA40051C1197E291197E05A000A45A0001188229118820002E4A4002E4EE
        8820008A06060A000A001ACF85820040004000020704003F08550000000B0068
        0008C000047E000112B88C047E0B540E600200A34F5383FFFFFFFFFF00102D87
        58F51A360503240028C9000D82C0A360B00008D2800234282C0A0A0B00DC0028
        3700028140A0A0500007328001CCD81400008A06060B000B001AE240D2004000
        4000020705003F085F0000000C00680005000004B0000112B85004B00C1404B0
        04000E06C60055FFFFFFFFAA0E06C63CFF000000FF00102D8438FF1A3B055388
        0028E2000EC2ACA3B0AB000882800220142ACA050AB07800281E00014154A050
        550007828001E0EC1540008A06060C000C001AA2831600400040000207060040
        004000400040004000400040004000400040000000000300006E1300006E1300
        00080002000000000008003800000044003A005C005F007700650062005C0044
        0046005C0066006C006100730068005C00640065006D006F005F0031002E0073
        0077006600000008003800000044003A005C005F007700650062005C00440046
        005C0066006C006100730068005C00640065006D006F005F0031002E00730077
        006600000008000E000000570069006E0064006F00770000000B00FFFF0B00FF
        FF08000A0000004800690067006800000008000200000000000B000000080002
        000000000008000E00000061006C007700610079007300000008001000000053
        0068006F00770041006C006C0000000B0000000B00FFFF080002000000000008
        0002000000000008000200000000000D00000000000000000000000000000000
        000B000100}
    end
    object TSWFChildren268: TSWFChildren
      Left = 2
      Top = 2
      Width = 188
      Height = 188
      TabOrder = 1
      Visible = False
      Host = ShockwaveFlashList1
      ControlData = {
        66556655C406000046575306C406000070000FA00000FA00000C34003F084D00
        000001005418FA418FA00112B1F41F409B55A80200FFFFFFFFFF000080FF0010
        2D4AA2A99EE88C9C00279C002E9749EE974004E27004E119749D197464002764
        001188C9D188C00322700322E88C001F080200680017700001F4000100FF0000
        CC00102C1EC5DC72BE8ECA2472C180008F060601000100C9000040000D7D03E8
        008906060200020014C8000040008F060701000100C9199943330D7D03E80089
        06070200020014D20F0040008F060701000100C9333346664D7D03E800890607
        0200020014DC1E0040008F060701000100C94CCC49998D7D03E8008906070200
        020014E62D0040008F060701000100C966664CCCCD7D03E80089060702000200
        14F03C0040008F060701000100C9800050000D7D03E80089060702000200167D
        12C040008F060701000100C9999953330D7D03E8008906070200020016821680
        40008F060701000100C9B33356664D7D03E8008906070200020016871A404000
        8F060701000100C9CCCC59998D7D03E80089060702000200168C1E0040008F06
        0701000100C9E6665CCCCD7D03E800890607020002001848887040008F060701
        000100CD00001800035F40FA0089060702000200184B096040008F0607010001
        00CD0CCC98CCC35F40FA0089060702000200184D8A5040008F060701000100CD
        19999999935F40FA008906070200020018500B4040008F060701000100CD2666
        1A66635F40FA008906070200020018528C3040008F060701000100CD33331B33
        335F40FA008906070200020018550D2040008F060701000100CD40001C00035F
        40FA008906070200020018578E1040008F060701000100CD4CCC9CCCC35F40FA
        0089060702000200185A0F0040008F060701000100CD59999D99935F40FA0089
        060702000200185C8FF040008F060701000100CD66661E66635F40FA008A0607
        020002001A2F84380040008F060701000100CD73331F33335F40FA008A060702
        0002001A30C4740040008F060701000100CD80002000035F40FA008A06070200
        02001A3204B00040008F060701000100CD80002000035F40FA008A0607020002
        001A3204B00040008F060701000100CD80002199935F40FA008A060702000200
        1A3704BA0040008F060701000100CD80002333335F40FA008A0607020002001A
        3C04C40040008F060701000100CD800024CCC35F40FA008A0607020002001A41
        04CE0040008F060701000100CD80002666635F40FA008A0607020002001A4604
        D80040008F060701000100CD80002800035F40FA008A0607020002001A4B04E2
        0040008F060701000100CD80002999935F40FA008A0607020002001A5004EC00
        40008F060701000100CD80002B33335F40FA008A0607020002001A5504F60040
        008F060701000100CD80002CCCC35F40FA008A0607020002001A5A0500004000
        8F060701000100CD80002E66635F40FA008A0607020002001A5F050A0040008F
        060701000100CD80003000035F40FA008A0607020002001A6405140040008F06
        0701000100CD80003199935F40FA008A0607020002001A69051E0040008F0607
        01000100CD80003333335F40FA008A0607020002001A6E05280040008F060701
        000100CD800034CCC35F40FA008A0607020002001A7305320040008F06070100
        0100CD80003666635F40FA008A0607020002001A78053C0040008F0607010001
        00CD80003800035F40FA008A0607020002001A7D05460040008F060701000100
        CD80003999935F40FA008A0607020002001A8205500040008F060701000100CD
        80003B33335F40FA008A0607020002001A87055A0040008F060701000100CD80
        003CCCC35F40FA008A0607020002001A8C05640040008F060701000100CD8000
        3E66635F40FA008A0607020002001A91056E0040008F060701000100D0C00010
        0000D7D03E808A0607020002001A9605780040008F060701000100D0C0001066
        64D7D03E808A0607020002001A9B05820040008F060701000100D0C00010CCCC
        D7D03E808A0607020002001AA0058C0040008F060701000100D0C000113330D7
        D03E808A0607020002001AA505960040008F060701000100D0C000119998D7D0
        3E808A0607020002001AAA05A00040008F060701000100D0C000120000D7D03E
        808A0607020002001AAF05AA0040008F060701000100D0C000126664D7D03E80
        8A0607020002001AB405B40040008F060701000100D0C00012CCCCD7D03E808A
        0607020002001AB905BE0040008F060701000100D0C000133330D7D03E808A06
        07020002001ABE05C80040008F060701000100D0C000139998D7D03E808A0607
        020002001AC305D20040008F060701000100D0C000140000D7D03E808A060702
        0002001AC805DC0040000000000300006E1300006E1300000800020000000000
        08001A00000063003A005C00640065006D006F0031002E007300770066000000
        08001A00000063003A005C00640065006D006F0031002E007300770066000000
        08000E000000570069006E0064006F00770000000B00FFFF0B00FFFF08000A00
        00004800690067006800000008000200000000000B0000000800020000000000
        08000E00000061006C0077006100790073000000080010000000530068006F00
        770041006C006C0000000B0000000B00FFFF0800020000000000080002000000
        000008000200000000000D00000000000000000000000000000000000B000100}
    end
    object TSWFChildren251: TSWFChildren
      Left = 2
      Top = 2
      Width = 188
      Height = 188
      TabOrder = 2
      Visible = False
      Host = ShockwaveFlashList1
      ControlData = {
        665566555B010000465753065B01000070000FA00000FA00000C02000F0C0100
        130005417269616C00000000005E09020060643E80641F40850001001C02FF00
        00FF4564697454657874003000850602010002003F0849000000030055A8965A
        89600112B12C12C08A6A600200FFFFFFFFFF666666FF00102D2C86466B050880
        09A2002C2C26B0B0008898022142C2650B0780099E00141426505000789801E2
        C14000BF084000000004000015000B030000000000040300000000A5900A0500
        000000080096140000456469745465787400004564697454657874001C189605
        000701000000471D008E0626020004001AFA07D0006275740040003F035E0000
        009619000701000000006275740007000000000062757400070000000022960A
        000707000000070F000000304D0B472396140000627574000701000000006275
        7400070100000022960A000707000000070F000000304D0B47239F0100010040
        000000000300006E1300006E130000080002000000000008003800000044003A
        005C005F007700650062005C00440046005C0066006C006100730068005C0064
        0065006D006F005F0037002E00730077006600000008003800000044003A005C
        005F007700650062005C00440046005C0066006C006100730068005C00640065
        006D006F005F0037002E00730077006600000008000E000000570069006E0064
        006F00770000000B00FFFF0B00FFFF08000A0000004800690067006800000008
        000200000000000B000000080002000000000008000E00000061006C00770061
        00790073000000080010000000530068006F00770041006C006C0000000B0000
        000B00FFFF0800020000000000080002000000000008000200000000000D0000
        0000000000000000000000000000000B000100}
    end
  end
  object RadioGroup1: TRadioGroup
    Left = 199
    Top = 4
    Width = 132
    Height = 105
    Caption = 'Layout'
    ItemIndex = 0
    Items.Strings = (
      'Single'
      'Matrix LR'
      'Matrix TB'
      'Diagonal')
    TabOrder = 1
    OnClick = RadioGroup1Click
  end
  object PopupMenu1: TPopupMenu
    Left = 276
    Top = 120
    object N11: TMenuItem
      Caption = '1'
      OnClick = N11Click
    end
    object N21: TMenuItem
      Tag = 1
      Caption = '2'
      ImageIndex = 0
      OnClick = N11Click
    end
    object N31: TMenuItem
      Tag = 2
      Caption = '3'
      ImageIndex = 2
      OnClick = N11Click
    end
  end
end

						