mainfm.dfm.~1~

来自「一个用delphi写的火焰效果的绘图程序」· ~1~ 代码 · 共 95 行

object MainForm: TMainForm
  Left = 194
  Top = 105
  BorderStyle = bsSingle
  Caption = 'Asphyre - Combustion Example'
  ClientHeight = 480
  ClientWidth = 640
  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
  PixelsPerInch = 96
  TextHeight = 13
  object Timer: TAsphyreTimer
    Speed = 60.000000000000000000
    MaxFPS = 200
    Enabled = False
    OnTimer = TimerTimer
    OnProcess = TimerProcess
    Left = 24
    Top = 56
  end
  object Images: TAsphyreImages
    Publisher = Device
    MipMappping = False
    Left = 88
    Top = 24
  end
  object Fonts: TAsphyreFonts
    Publisher = Device
    Canvas = MyCanvas
    Left = 120
    Top = 24
  end
  object Device: TAsphyreDevice
    Width = 640
    Height = 480
    BitDepth = bdHigh
    Refresh = 0
    Windowed = False
    VSync = True
    HardwareTL = True
    DepthBuffer = False
    WindowHandle = 0
    OnInitialize = DeviceInitialize
    OnRender = DeviceRender
    Left = 24
    Top = 24
  end
  object MyCanvas: TAsphyreCanvas
    Publisher = Device
    AlphaTesting = True
    VertexCache = 4096
    Antialias = True
    Dithering = True
    Left = 56
    Top = 24
  end
  object Particles: TAsphyreParticles
    Publisher = Device
    Canvas = MyCanvas
    Images = Images
    Left = 152
    Top = 24
  end
  object Archive: TASDb
    FileName = 'combustion.asdb'
    OpenMode = opUpdate
    Left = 56
    Top = 56
  end
  object Loader: TAsphyreLoader
    Publisher = Device
    Images = Images
    Fonts = Fonts
    Archive = Archive
    XMLDescFile = 'combustion.xml'
    Left = 88
    Top = 56
  end
  object Screener: TAsphyreScreener
    FileName = 'screen.jpg'
    AutoInc = True
    Left = 120
    Top = 56
  end
end