有谁用过swflash.ocx(50分)

K

kmgyl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-11-17

• #1

给个例子，谢谢 ！！！

 

C

cAkk

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-11-17

• #2

遇到什么困难吗?

 

阿

阿蒙

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-11-17

• #3

好像是支持 flash 的控件,不过我可没见过,如能得到,也请给我一个,我也是 flash
迷, email meng_1226@freemail.online.tj.cn

 

K

kmgyl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-11-17

• #4

我刚搞到一个swflash.ocx 看了别人的一个网站（用了这个ocx），很漂亮
，想试一试,但总是不对,如果有谁用过给我一点提示,谢谢！！

 

C

cAkk

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-11-17

• #5

原来是网页上用!可怜我用delphi把他import进来.....

 

M

midi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-12-05

• #6

unit swf;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, Buttons, OleCtrls, ShockwaveFlashObjects_TLB;

type
TForm1 = class(TForm)
ShockwaveFlash1: TShockwaveFlash;
BitBtn1: TBitBtn;
procedure BitBtn1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
swfNM:string;

implementation

{$R *.DFM}

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
swfNM:=extractfilepath(application.exename);
swfNM:=swfNM+'/'+'demo.swf';
shockwaveflash1.Movie:=swfNM;
end;

end.

一个控件，一个按扭，解决问题！！！

 

阿

阿蒙

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-12-05

• #7

忘了是那位老大给我的控件，在这里多谢了。不过这个控件相当耗费资源。32 兆
run 还行。编辑时拖动后都得等半天
flash 我玩过几天。 它的存盘文件 叫 movie 可 export 一个 *。swf 文件
把 shoveflash 的 movie 属性 连到 一个 *。swf 文件即可。然后法调用 play
如 midi
swfNM:=extractfilepath(application.exename)
swfNM:=swfNM+'/'+'demo.swf';
shockwaveflash1.Movie:=swfNM
shovewaveflash1.play

 

P

pwpengwei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-12-08

• #8

flash的*.swf文件可用浏览器浏览，不过得加插件，或者你得机子上装了FLASH
DELPHI中的用法MIDI和阿蒙讲的很清楚

 

阿

阿蒙

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-12-10

• #9

被人的网站是用 flash 作的跟 swflah。ocx 无关，但需一个flash 的插件才能看
不然。。（一个字也没有）。而swfkash。ocx 是可以给 delphi vb vc 用的 active 控件，可以让 delphi 播放 *。swf 这样的 flash 文件。就向 mediaplay 可播放 *。avi 等文件一样

 

阿

阿蒙

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-01-12

• #10

快给分吧等不及了。

 

M

midi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-01-13

• #11

举双手同意
我的专家分现在还是零

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-01-13

• #12

Component=>Import ActiveX Control...
=>（如Import ActiveX Control项无Sockwave Flash 则安装
flash 插件，光在网上下载插件即可）
=>选中Sockwave Flash ,Install...就行了！
=>Component面板有ShockwaveFlash控件了吧。
=>接下去……没事偷着乐吧！
例：
可在一个窗体上有一个 按钮一个opendialog 用于打开文件，
还有 swflash 控件。按钮的 onclick 事件如下
opendialog1.execute;
swf;=opendialog1.filename;
shockwaveflash1.Movie:=swf;
shockwaveflash1.play;

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-01-13

• #13

sorry:
是 swf:=opendialog1.filename;

 

阿

阿蒙

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-01-13

• #14

wjiachun
怎莫感觉你是抄袭我在另一处写的。 连 swf 用的都一样 ：（

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-01-13

• #15

>>to 阿蒙:
我就是Copy 你的代码呀！！
请看：<a href="http://www.gislab.ecnu.edu.cn/delphibbs/DispQ.asp?LID=174778">请教如何在Delphi中调用Flash(100分)</a>

 

流

流云

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-01-13

• #16

是抄袭你的!!

 

R

robert.l

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-01-15

• #17

当时能用，但好象不稳定，换台机器运行一下试试，各位,嘻嘻...

 

阿

阿蒙

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-01-16

• #18

i am waitting

 

阿

阿蒙

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-01-17

• #19

 

K

kmgyl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-01-21

• #20

多人接受答案了。