荔园在线
荔园之美，在春之萌芽，在夏之绽放，在秋之收获，在冬之沉淀
[回到开始]
[上一篇][下一篇]
发信人: georgehill (佐治·希尔【多情网虫无情网】), 信区: Program
标 题: TCHimage组件实现图形切换效果
发信站: BBS 荔园晨风站 (Sun Mar 12 01:42:17 2000), 转信
资料整理·中国程序员网站
TCHimage组件实现图形切换效果
(湖北 周新)
Delphi3.0与Authorware、Director、ToolBook等多媒体工具软件相比，没有提供
图形切换效果组件，不免使其制作的多媒体程序看上去有些呆板。
在《PC世界3》上我发现了安徽的李新华朋友制作图形切换效果组件TCHimage，喜
爱用Delphi编程的朋友不妨拷下来一试。下面我简单介绍一下这个组件的使用方法∶
TCHimage组件是由Timage派生的子类。要使用这个组件，首先在DELPH中选择“
COMPONENT/INSTALL COMPONENT”。
选择“UNIT FILE NAME”，输入文件名TEST.PAS，按OK键，系统自行将TCHIMAGE
组件加入到SAMPLE控件组中，这时便可以使用TCHIMAGE类了。下面通过一例具体介绍
一下该组件的用法。
首先从SAMPLE控件组中选择TCHIMAGE，在FORM中创建一个TCHIMAGE对象，打开属
性表，可以看到其基本属性与其父类TIMAGE一致，只是多了一个EFFECT属性，此属性
即决定其PICTURE指定图形的切换效果，从0～24，总共25个值。这样，只需简单设置
EFFECT的值，便可使你的图形有多达25种形式不同、内容丰富的切换方式，真是帅呆
了。同时，在程序执行过程中，你还可以通过随时调用SetEffect(Effect:byte,
FileName:string)过程动态实现图形效果的切换，使你的应用程序更加千变万化，丰
富多彩。以下就以一例说明TCHIMAGE是怎样设置的。
1.创建一个FORM，在SAMPLE构件组中选择TCHIMAGE构件，在FORM中指定大小。
2.激活TCHIMAGE属性框，在EFFECT属性栏中输入0，PICTURE属性可暂时不写，留
待程序中再动态加入（对于TCHimage的Picture属衧nap.bmp′;
chimage1seteffect(14,aa);
end;
执行程序，你将看到图像呈现百页窗的效果如图，效果真的不错哟。灵活地使用
这25种效果，你将发现原来你的多媒体软件也可以如此出色！
--
那你可不可以教我，
有什么办法可以不去喜欢一个人呢？
-- Bye 赤明莉香 --
我是来自大富翁的小美！^_^
※ 来源:·BBS 荔园晨风站 bbs.szu.edu.cn·[FROM: 192.168.1.115]
[回到开始]
[上一篇][下一篇]
荔园在线首页 友情链接：深圳大学 深大招生 荔园晨风BBS S-Term软件 网络书店