B
bambinoo
Unregistered / Unconfirmed
GUEST, unregistred user!
我这儿将图片、影片、flash等资源都放在数据库里。
服务器端从数据库取得资源,代码如下:
procedure TWebModule1.WebModule1WebActionItem1Action(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
...
if not adoquery.IsEmpty then
try
s:=Tmemorystream.Create;
Tblobfield(adoquery.FieldByName('bin')).SaveToStream(s);
s.Position:=0;
response.ContentStream:=s;
response.SendResponse;
finally
s.Free;
end
else
response.Content:='资源不存在';
end
.....
end;
然后通过html编辑器编辑html文档,文档中包含上面资源的请求,如下:
<embed src=http:/..........
quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?
P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash">
这些html也存在数据库中,现在在intraweb中显示上面的html,
问题是包含图片好像没有问题,当html里面包含较大的flash时,
flash也能播放,但页面静止不动,页面上其他的交互不能使用
状态栏显示页面还没有完全打开,网页也不报错
服务器端从数据库取得资源,代码如下:
procedure TWebModule1.WebModule1WebActionItem1Action(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
...
if not adoquery.IsEmpty then
try
s:=Tmemorystream.Create;
Tblobfield(adoquery.FieldByName('bin')).SaveToStream(s);
s.Position:=0;
response.ContentStream:=s;
response.SendResponse;
finally
s.Free;
end
else
response.Content:='资源不存在';
end
.....
end;
然后通过html编辑器编辑html文档,文档中包含上面资源的请求,如下:
<embed src=http:/..........
quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?
P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash">
这些html也存在数据库中,现在在intraweb中显示上面的html,
问题是包含图片好像没有问题,当html里面包含较大的flash时,
flash也能播放,但页面静止不动,页面上其他的交互不能使用
状态栏显示页面还没有完全打开,网页也不报错