RecorderD.dpr 725 B

123456789101112131415161718192021222324
  1. (* This sample demonstrates use of the TGLAVIRecorder to create an AVI file.
  2. The animation is taken from the "Hierarchy" sample, all the recording takes
  3. place in Button1Click.
  4. Be aware that if you use default compression, you will likely get a lossless,
  5. low compression codec (which may be good if you want the highest quality),
  6. but you can specify a codec, for instance DiVX (www.divx.com) if you
  7. installed it, for high compression video.
  8. The codec can be choosed with the Compressor property of TGLAVIRecorder.
  9. *)
  10. program RecorderD;
  11. uses
  12. Forms,
  13. fRecorderD in 'fRecorderD.pas' {Form1};
  14. {$R *.RES}
  15. begin
  16. Application.Initialize;
  17. Application.CreateForm(TForm1, Form1);
  18. Application.Run;
  19. end.