mainfm.dfm

一个用delphi写的火焰效果的绘图程序

object MainForm: TMainForm
  Left = 185
  Top = 143
  Width = 808
  Height = 634
  Caption = #26446#21073#65288#23545#32593#32476#19978#30340'huoren'#30340#29305#25928#31243#24207#31245#20316#20462#25913#65289
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnKeyDown = FormKeyDown
  OnMouseDown = FormMouseDown
  OnMouseMove = FormMouseMove
  OnMouseUp = FormMouseUp
  PixelsPerInch = 96
  TextHeight = 13
  object Timer: TAsphyreTimer
    Speed = 60.000000000000000000
    MaxFPS = 2000
    Enabled = False
    OnTimer = TimerTimer
    OnProcess = TimerProcess
    Left = 71
    Top = 64
  end
  object Images: TAsphyreImages
    Publisher = Device
    MipMappping = False
    Left = 204
    Top = 64
  end
  object Fonts: TAsphyreFonts
    Publisher = Device
    Canvas = MyCanvas
    Left = 160
    Top = 64
  end
  object Device: TAsphyreDevice
    Width = 800
    Height = 600
    BitDepth = bdHigh
    Refresh = 0
    Windowed = True
    VSync = True
    HardwareTL = True
    DepthBuffer = False
    WindowHandle = 0
    OnInitialize = DeviceInitialize
    OnRender = DeviceRender
    Left = 27
    Top = 64
  end
  object MyCanvas: TAsphyreCanvas
    Publisher = Device
    AlphaTesting = True
    VertexCache = 4096
    Antialias = True
    Dithering = True
    Left = 115
    Top = 64
  end
  object Particles: TAsphyreParticles
    Publisher = Device
    Canvas = MyCanvas
    Images = Images
    Left = 29
    Top = 20
  end
  object ASDB: TASDb
    FileName = 'fire.asdb'
    OpenMode = opUpdate
    Left = 249
    Top = 64
  end
end