请问如何能做完下面的功能,RichEdit显示GIF动画?现在添加时能在RichEdit中添加BMP与GIF图片,
GIF也能动,想实现如何能存储RichEdit中内容到sql2000,并且能够读取,格式与原格式一样,
且GIF也能动!请问该怎样改软件?下面是软件的下载链接TestGif!分不够开帖再加,前提要源码,可以发到,好使再送500分!
http://good.gd/1714805.htm

解决方案 »

  1.   

    LZ能给个zip的链接么,单位不让装rar
      

  2.   

    发我一份吧,帮你看看
    [email protected]
      

  3.   

    funxu,我已经发到你的信箱了,你看看吧
      

  4.   

    代码已改好
    直接运行GifTest.exe
    代码中添加了一个按钮,是从richedit中获取已存入的gif文件名的,没办法因为GifAnimator这个接口只提供getfilepath这个方法来取得保存的图片名称,但没有获取实例的方法,而且gif是动态图片也不能通过截图来解决,我没测试这个方法是否可以附带路径,你可以自己测试下,因为无法获取gif文件实例,你可以通过我提供的方法来获取gif文件名,同时gif保存在固定的路径下,这样就可以用文件流取得richedit中保存的gif文件了。
    至于保存到数据库,可以参照bmp保存到数据库的方法用TBlobField 直接从硬盘上读取文件来做
    http://www.examda.com/ncre2/Delphi/zonghe/20090624/081252486.html如果觉得这个方法不可行,建议你放弃吧,因为第三方的active和gifanimanor提供的方法有限没办法直接获取实例,不过有个替代放案,自己修改richedit控件,其中添加文件流list来保存显示的gif,而显示gif的方法可以参照目前代码中的方案,不过改动较大,量力而行吧
      

  5.   

    没有funxu,我还是想直接存到数据里,哪管分成两个表或两部分存取也行,考虑到安全隐患,另外
    左侧Richedit中添加Gif时最好可以用OpenPictureDialog打开选择添加,添加好后再存到数据库中,可以设个编号如:001,然后再根据编号001读出来放到右侧Richedite2中,格式不变,gif能动。
    不用RichEdit也行,只要能实现功能!
      

  6.   

    “用OpenPictureDaldog打开选择”这种简单的代码都需要别人代劳的话,我只能说:祝你好运了,少年。人不自救,而非人救之也。