delphi实现透明窗体和播放MP3声音(100分)

  • 主题发起人 主题发起人 zhmj
  • 开始时间 开始时间
Z

zhmj

Unregistered / Unconfirmed
GUEST, unregistred user!
请详细介绍用delphi实现透明窗体的过程以及播放MP3声音的方法
 
实现透明窗体的过程是非常简单的,我记得是在oncreate中
设置窗体的style为bsclear,这样一来,就可以透明窗体了
至于播放mp3,我想可能应该算是单独的一个话题了,如果
你只是想引用的话,可以找一个控件来做。:)
good luck
 
Tform 没有style, 有formstyle,但不认bsclear,
canvas.brush.style:=bsclear也不行.
不成功
希望进一步指导!!!
 
1.找一个可以显示透明BMP的控件。
2.将其Align=alClient;
3.将Form.BorderStyle:=bsNone;

Mp3控件.
 
transimg.zip 295,300 bytes

ver: 0.81
upd: 18/Apr/1999
do
wnloadslast update: 1460
Kire Zvezdakoski ( KMS )


With this component you are able to generate transparent Forms and Panels with only one line of code. Only call Execute method at Form's OnCreate Event. And that's all. You just made an coll looking form in a minute. You have to set Picture Property to Bitmap thats generates transparency region. Set AdjustFormSize to False if youdo
n't want to update form height and width to that ones from Picture. Set TransColor. You havedo
ne great job. Demo application is included.


 
coold5.zip 87,964 bytes

ver: 1.5 for D5
upl: 24/Oct/1999
do
wnloadslast update: 0
Tim Lawrenz
Max Muermann


CoolForm is a component for Delphi that easily lets you create the
weirdest shapes of your windows. Round windows, Windows with transparent areas, and still the full functionality of the Windows95
GUI (but who would want that, anyway).

以及Mp3控件,发给你了.

 
Cool3D &
Mp3 Control Include Source
TransImg: no source.
 
Hexi:
coolform给我一个呗
 
如果仅仅是要透明窗体的话,大致的语句是这样的:
form1.canvas.brush.style:=bsclear;
这样,窗体就是透明的了。
 
接受答案了.
 
好象不行呀!你们是怎么作到的呢?
急!!!!!!!!!!!!!!111
 
邹光先说的方法很简单,但我实现不了,不知是否还有其它原因?
而据我所知,要实现窗口的透明,无它,只有不断取desktop的hdc后将它画
到当前窗体的canvas中,也可用bitblt,只有不断快速的重画才能在视觉上保持
透明的感觉...
此法较烦,愿向各位学其它好方法!
 
后退
顶部