Delphi 中 TRichViewEdit支持GIF

原创 2012年03月22日 08:54:37

在Delphi中,TRichViewEdit支持GIF,我的开发环境是  Delphi XE 版本。


代码如下:


procedure TForm2.AddGifToRichViewEdit;
var
 aStream: TMemoryStream;
 LGraphic: TGraphic;
begin
  aStream := TMemoryStream.Create;
  aStream.LoadFromFile('F:\30.gif');
  LGraphic := TGIFImage.Create;
  LGraphic.LoadFromStream(aStream);
  RichViewEdit1.InsertPicture('gif', LGraphic, rvvaBaseline);
  aStream.Free;
end;

在USES  中    RVGifAnimate(Delphi2007是 RVGifAnimate2007),GIFImage,


RVGifAnimate2007 for Delphi 2007, or
RVGifAnimate for Anders' TGifImage, or
RVJvGifAnimate for JVCL Gif Image


在 设置 RichViewEdit1的属性AnimationMode:=rvaniOnFormat;  注意 一定是设计时指定控件属性,在直接在代码中指定


RichViewEdit1.AnimationMode:=rvaniOnFormat;  GIF图是不会有动态效果(这一点,不是为什么)!注意是设计时。

如果还是不动,就添加(反正我的代码中 没有加。主要是为了注册 TGIFImage 组件)

initialization

RegisterClasses([TGIFImage]);










TrichView结构

关于RichView,做过或想做编辑器的朋友一定要知道,它对文本、图片、表格提供了诸多支持,可以极大的缩短开发时间。 本人搜集的fullsrc:http://download.csdn.net/de...

DELPHI如何读取数据库中jpeg图片

 // 用到 jpeg 单元procedure TForm1.BitBtn1Click(Sender: TObject);var picstream:Tblobstream;pic:Tjpegimag...
  • szliszt
  • szliszt
  • 2008年03月23日 23:55
  • 1848

解决TRichView_v1911控件出现乱码的方法

解决TRichView_v1911控件出现乱码的方法:TRichView_v1911是很不错的副文本编辑控件,但是它对中文的支持很差,其中如果文件保存为RTF格式的文档后,再读取时,换行的时候就很可能...
  • marklr
  • marklr
  • 2008年01月14日 14:23
  • 1431

Delphi增加对动画Gif的支持

以下内容转载于网络:http://hi.baidu.com/delphilee/blog/item/7fd4a73f8c94f3e855e72310.html   今天在查看Rad Studio ...
  • kampan
  • kampan
  • 2011年12月27日 17:33
  • 7608

Delphi7支持GIF显示的代码

  • 2017年10月10日 14:13
  • 232KB
  • 下载

DELPHI - Delphi 2007 已内部支持 GIF 动画了

====================================================== 注:本文源代码点此下载 =============================...

Delphi中载入GIF动画

Delphi中载入GIF动画 http://www.cnblogs.com/wsoft/articles/2658089.html Delphi 2009 gif动画方法 以前要在...

delphi RichEdit控件中插入GIF动画表情

delphi在RichEdit控件中插入GIF动画表情 在UDP即时通讯软件中实现类似于QQ的动画表情,在richEdit控件中插入gif动画表情。 发送的时候将表情转为命令,接收之后,再将命令转...

delphi RichEdit控件中插入GIF动画表情

delphi在RichEdit控件中插入GIF动画表情 在UDP即时通讯软件中实现类似于QQ的动画表情,在richEdit控件中插入gif动画表情。 发送的时候将表情转为命令,接收之后,再将命令转换为...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:Delphi 中 TRichViewEdit支持GIF
举报原因:
原因补充:

(最多只允许输入30个字)