object Form1: TForm1 Left = 284 Top = 105 Caption = 'GLScene Particles' ClientHeight = 319 ClientWidth = 427 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter WindowState = wsMaximized OnResize = FormResize PixelsPerInch = 96 TextHeight = 13 object GLSceneViewer1: TGLSceneViewer Left = 0 Top = 0 Width = 427 Height = 319 Camera = GLCamera1 Buffer.BackgroundColor = clBlack Buffer.DepthTest = False FieldOfView = 145.189712524414100000 Align = alClient TabOrder = 0 end object GLScene1: TGLScene Left = 8 Top = 8 object GLParticles1: TGLParticles ObjectsSorting = osNone Scale.Coordinates = {00000040000000400000004000000000} CubeSize = 1.000000000000000000 OnActivateParticle = GLParticles1ActivateParticle BehavioursData = { 0458434F4C02010201060B54474C42496E657274696102001200000000020002 00050000000000000080FF3F0200080500000000000000F00340050000000000 0000000000050000000000000000000008020008020008} object Sprite1: TGLSprite Material.FrontProperties.Ambient.Color = {0000000000000000000000000000803F} Material.FrontProperties.Diffuse.Color = {0000000000000000000000000000803F} Material.BlendingMode = bmAdditive Material.Texture.ImageClassName = 'TGLPicFileImage' Material.Texture.TextureMode = tmModulate Material.Texture.TextureFormat = tfIntensity Material.Texture.Disabled = False OnProgress = Sprite1Progress Width = 1.000000000000000000 Height = 1.000000000000000000 Rotation = 0.000000000000000000 end end object GLCamera1: TGLCamera DepthOfView = 100.000000000000000000 FocalLength = 50.000000000000000000 TargetObject = GLParticles1 Position.Coordinates = {0000704100000000000000000000803F} end end object GLCadencer1: TGLCadencer Scene = GLScene1 SleepLength = 1 Left = 8 Top = 48 end object Timer1: TTimer Interval = 300 OnTimer = Timer1Timer Left = 48 Top = 8 end end