FireD.dpr 948 B

1234567891011121314151617181920212223242526272829
  1. (*
  2. The fire special effect basic sample.
  3. If you look at the code you won't see anything fancy. The FireFX is a dynamic
  4. special effect (driven by a cadencer). Making use of it means two things :
  5. - dropping a FirexFXManager, this one controls fire particle systems aspects
  6. - adding a FireFX effect to the object you want to see burning (here, a sphere)
  7. You may have multiple objects sharing the same FireFXManager, this means they
  8. will all look the same, but also that the particle system calculations are
  9. made only once.
  10. This effect looks cool but is fill-rate hungry, but un-textured fillrate
  11. hungry, ie. video card memory bandwith is not an issue. Anyway, you can
  12. always make it look nice with smaller and/or less particles.
  13. *)
  14. program FireD;
  15. uses
  16. Forms,
  17. fFireD in 'fFireD.pas' {FormFire};
  18. {$R *.RES}
  19. begin
  20. Application.Initialize;
  21. Application.CreateForm(TFormFire, FormFire);
  22. Application.Run;
  23. end.