社区
Delphi
帖子详情
关于Tanimate的问题
zsr
2000-06-06 10:05:00
如何在Tanimate中使用DLL中的AVI?为什么总是出现"无法打开AVI"的错误?
...全文
181
6
打赏
收藏
关于Tanimate的问题
如何在Tanimate中使用DLL中的AVI?为什么总是出现"无法打开AVI"的错误?
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
6 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
roach
2001-01-14
打赏
举报
回复
把原来的多媒体控件删了,从放一个,从新设一下参数!!
应该可以了!!!
wenzm
2001-01-14
打赏
举报
回复
为什么不用资源文件,你可在命令行下用BRCC32编译为资源文件调用啊!
Delfly
2001-01-14
打赏
举报
回复
如果你直接用Tamimate调用AVI都不行,那么可能是下面的原因。
AVI有很多种格式,你的AVI文件Delphi不支持。你用Paint Shop Pro的Animation Shop转换成其他格式的AVI试试,我记得只有一种格式Delphi是支持的,具体不记得了。
Kingron
2001-01-13
打赏
举报
回复
看看你的代码就知道了。可能是你的句柄不对。
zsr
2001-01-13
打赏
举报
回复
help!
Lin
2000-06-07
打赏
举报
回复
1、使用正确的ResHandle;
2、使用正确的ResID或者ResName
使用Delphi制作响应T
Animate
组件的OnClick事件..rar
使用Delphi制作响应T
Animate
组件的OnClick事件..rar
支持Gif格式等待窗口_线程方案
程序中总会用到支持Gif格式的动态窗口,从其他地方找的要么用第三方,要么在D2010 Win6 64位环境下 T
Animate
无法显示
问题
用不了 就花了些时间自己写个动态窗口,使用线程来执行动画窗口,用Image控件显示动态Gif
程序运行过程中等待对话框
不得擅自修改该文件,如果你在使用中有什么意见,可以和作者联系,联系方式:whj7510@citiz.net 主要用于程序运行过程中显示一个等待对话框,其中包含一个AVI(T
Animate
),两个提示信息(即TLabel),一个进度条(TGauge);可以对相关主要方法: FormShow : 显示等待对话框 FormHide : 关闭等待对话框 ProgressStepIt : 等待对话框中进度条位置自增一个Step 主要属性: Name : 等待对话框名称 Caption : 等待对话框标题Caption Message1 : 等待对话框的提示信息1 Message2 : 等待对话框的提示信息2 wordWrap : Message1,Message2一行显示不完,是否自动转行 Message1Font , Message2Font : Message1,Message2字体 AVIAcitive : 等待对话框中AVI动作是否执行 ProgressMax : 进度条最大值 ProgressMin : 进度条最小值 Progresspos : 进度条当前位置 ProgressStep : ProgressStepIt 方法中进度条自增一个Step的量 DialogStyle(=dlgNormal, dlgStayOnTop): 等待对话框显示时是否始终在最前面 AviPosition(=aviBottom,aviTop,aviLeft) : AVI的位置 [Options]: showMessage1 :是否显示提示信息1 showMessage2 :是否显示提示信息2 showAVI :是否显示AVI showCaption :是否显示等待对话框Caption showProgress :是否显示进度条 ShowProgressText :进度条上是否显示进度百分比
AviWriter 带demo
Easiest way to install: Load the program group AviDemo.bpg, install the package AviPack.dpk(bpl), try the demos. Read the source of AviWriter_2.pas (in AviPack) to get help on what the procedures and properties do. **Current version: AviWriter_2 ver 1.0.0.4 Changes: Finally got On-the-fly compression working with still being able to add an audio-stream. Use property OnTheFlyCompression (default is true) Also, now more than one audio file can be added. For each wav-file a delay (ms) can be specified, which says when it'll start playing. Use method AddWaveFile. In 1.0.0.3 the delay got too short. Now it seems to work, due to really adding "silence" from the end of the previous audio file. Note: Some Codecs don't support On-the-fly compression. If OnTheFlyCompression is false, only one wave file can be added. **A list of codec-gotchas: (still unclear about the exact range of occurrance) IV50 Indeo Video 5: Both frame dimensions must be a factor of 4. DIVX DivX codec: Both frame dimensions must be a factor of 4. Gives a floating point error under certain circumstances. More and more likely that this occurs if the frames are too "different". If this happens, then there's an AV in Avifil32.dll, don't know how to prevent this. The codec compresses real movies nicely at frametimes <=60 ms, when changing the settings in its dialog box as follows: Bitrate (1st page): to >=1300 Max Keyframe interval (2nd page): to <=20. MRLE MS-RLE Use that one if you want to make avis which play transparently in a T
Animate
. (Thanks Eddie Shipman) But it does not support on-the-fly compression. Whenever a codec fails to work, there's this dreaded error "A call to an operating system function failed" while writing a compressed file, or an unhandled exception. The only way to prevent it, that I see, is, to collect more peculiarities about the codecs and stop execution in case of certain combinations of settings. When queried about their capabilities, some of these guys seem to lie. Renate Schaaf renates@xmission.com
Delphi开发范例宝典目录
第1章 窗体与界面设计 1 1.1 菜单应用 2 实例001 在系统菜单中添加菜单项 2 实例002 带历史信息的菜单 3 实例003 菜单动态合并 4 实例004 像“开始”菜单一样漂亮的菜单 5 实例005 多彩的菜单 6 实例006 可以拉伸的菜单界面 8 1.2 工具栏设计 9 实例007 带背景的工具栏 9 实例008 浮动工具栏 10 1.3 状态栏设计 11 实例009 在状态栏中显示检查框 11 实例010 带进度条的状态栏 12 实例011 状态栏中加入图标 13 1.4 导航菜单界面 14 实例012 OutLook界面 14 实例013 带导航菜单的主界面 15 实例014 图形化的导航界面 16 1.5 特色程序界面 18 实例015 类QQ的程序界面 18 实例016 类似Windows XP的程序界面 20 实例017 以图形按钮显示的界面 21 实例018 以树型显示的程序界面 23 实例019 以XPManifest组件显示界面 24 实例020 动态按钮的窗体界面 25 1.6 特殊形状的窗体 26 实例021 非矩形窗体 26 实例022 建立字体形状窗体 28 1.7 多媒体光盘 29 实例023 自动启动的多媒体光盘程序 29 实例024 为触摸屏程序添加虚拟键盘 30 实例025 触摸屏系统 31 1.8 窗体效果 33 实例026 半透明渐显窗体 33 实例027 窗口颜色的渐变 34 实例028 带背景的窗体 35 实例029 为窗体增加边框 36 1.9 窗体动画 37 实例030 窗体中的滚动字幕 37 实例031 动画显示窗体 38 实例032 制作闪烁的窗体 39 实例033 直接在窗体上绘图 40 实例034 动画形式的程序界面 41 实例035 以时钟显示界面窗体 42 1.10 标题栏窗体 44 实例036 标题栏上的按钮 45 实例037 使窗体标题栏文字右对齐 47 实例038 没有标题栏但可以改变大小的窗口 48 1.11 设置窗体位置 49 实例039 不可移动的窗体 49 实例040 设置窗体在屏幕中的位置 50 实例041 始终在最上面的窗体 51 1.12 设置窗体大小 52 实例042 限制窗体大小 52 实例043 获取桌面大小 53 实例044 组件大小随窗体的改变而改变 53 实例045 在窗口间移动按钮 54 实例046 如何实现Office助手 55 1.13 窗体控制技术 56 实例047 在关闭窗口前加入确认对话框 56 实例048 程序在循环中响应界面操作 57 实例049 使用任意组件拖动窗体 58 实例050 动态创建窗体和释放窗体 59 实例051 修改提示字体及颜色 60 1.14 其他技术 61 实例052 窗口融合技术 61 实例053 给MDI窗体加背景 62 实例054 如何关闭MDI类型窗体中的子窗体 63 实例055 向提示框中添加图标 64 第2章 控件应用 67 2.1 TEdit控件应用典型实例 68 实例056 从右至左输入数据 68 实例057 为TEdit控件添加列表选择框 69 实例058 只允许输入数字的TEdit组件 70 2.2 TSpeedButton控件应用典型实例 71 实例059 在TSpeedButton按钮中显示图标 71 实例060 折行显示按钮标题 72 2.3 TMemo控件应用典型实例 73 实例061 设置TMemo组件的边界 73 实例062 TMemo组件的光标定位 74 实例063 得到TMemo中的可见行数 75 2.4 TListBox控件应用典型实例 76 实例064 在TListBox组件间交换数据 76 实例065 为TListBox添加水平滚动条 77 实例066 将数据库数据添加到组合框中 78 实例067 借助绑定控件实现数据选择录入 79 2.5 TListView控件应用典型实例 80 实例068 TListView列表拒绝添加重复信息 80 实例069 将数据库数据添加到TListView控件 82 实例070 用TListView控件制作导航界面 83 实例071 在TListView控件中对数据排序或统计 84 实例072 在TListView组件中绘制底纹 86 实例073 在列表视图中拖动视图项 87 2.6 TTreeView控件应用典型实例 88 实例074 将数据库数据显示到树视图中 88 实例075 用TTreeView控件制作导航界面 90 实例076 TTreeView组件遍历磁盘目录 91 实例077 TTreeView组件在数据库中的应用 92 2.7 TStringGrid控件应用典型实例 94 实例078 程序运行时对
Delphi
5,392
社区成员
262,732
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章