main.dfm

delphi调用flash做为欢迎界面附flash及delphi源码

object FrmMain: TFrmMain
  Left = 261
  Top = 604
  Width = 623
  Height = 417
  Caption = 'Flash Face'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Flash1: TShockwaveFlash
    Left = 0
    Top = 0
    Width = 615
    Height = 390
    Align = alClient
    TabOrder = 0
    OnFSCommand = Flash1FSCommand
    ControlData = {
      6755665510070000903F00004F28000008000200000000000800000000000800
      0000000008000E000000570069006E0064006F00770000000B00FFFF0B00FFFF
      08000A0000004800690067006800000008000200000000000B00FFFF08000200
      0000000008000E00000061006C00770061007900730000000800100000005300
      68006F00770041006C006C0000000B0000000B00000008000200000000000800
      02000000000008000200000000000D0000000000000000000000000000000000
      0B0001000B00000008000000000003000000000008000800000061006C006C00
      000008000C000000660061006C00730065000000}
  end
end