BCB6中SCALERICHVIEW加入GIF动画

记载下，花了不少时间。

1、  项目导入文件GIFImage.pas

来源：http://melander.dk/delphi/gifimage/

2、  项目导入文件RVGifAnimate.pas

来源：D:RICHVIEWRICHVIEW

3、  应用到的SCALERICHVIEW所在的窗体中（如以下两条语句没有添加，GIF将不能进行动画）：：

#include "GIFImage.hpp"

#pragma link "RVGifAnimate"

4、  窗体构造函数中（如以下两条语句没有添加，GIF保存将丢失）：

RegisterClass(__classid(TGIFImage));

RV_RegisterHTMLGraphicFormat(__classid(TGIFImage));