Delphi在Webbrowser中插入 HTML/java script代码

使用方法
将下面的代码赋值到1个记事本里保存，然后保存为xxx.htm就可以看到效果
使用PasteHtml实现功能
 的事件

  1. Windows Media播放器 mp3
    mp4
  2. Windows Real
    Player
  3. Flash Player
  4. Mid背景音乐
  5. 图片

     的方法

( (WebBrowser1.Document as IHTMLDocument2).selection.createRange as
IHtmlTxtRange).pasteHTML(Memo1.Text);

注意 划删除线的表示使用这个函数无效果

播放Mid背景音乐  
src为Midi文件名，loop=-1为无限回放，1为一次，2为两次......

<HTML><HEAD>
<bgsound src=C:\1.mid loop=-1</HEAD>
<body></body></HTML>

Windows
Media播放器   支持播放 *.mp3 *.avi *.mp4  *.mov  *.wmv *.wav *.mid *.wma
*.m3u  *.mpeg *.csf  *.asf *.3gp

<object style="WIDTH: 480px; HEIGHT:
360px" ID="nsPlayer" classid="clsid:05589FA1-C356-11CE-BF01-00AA0055595A"> 
<PARAM NAME="FileName" VALUE=C:\1.mp3 /> 
<PARAM NAME="AutoStart" VALUE="1" /> 
<PARAM NAME="ShowDisplay" VALUE="0" /> 
</OBJECT>


Windows Media播放器      支持格式 *.mp4
*.avi 不支持.mp3

</STYLE>
</HEAD><BODY>
<DIV>
    <EMBED 
        width=400
        height=200 
        type=application/x-oleobject 
        codeBase=http://activex.microsoft.com/activex/controls/mplayer/en/nsmp2inf.cab#Version=5,1,52,701  
        src=file://C:/1.avi 
        autostart="false"
        flename="mp">
    </EMBED></EMBED></EMBED>
</DIV></BODY>
</HTML>

//REAL播放器
//支持格式 *.rm *.avi
<EMBED 
height=360
width=480 
src="c:\1.avi"
type=audio/x-pn-realaudio-plugin 
autostart="False" 
controls="ControlPanel">
</embed>
//REAL播放器
//支持格式 *.rm *.avi 

</HEAD><BODY>
<EMBED 
    width=480
    height=360 
    type=audio/x-pn-realaudio-plugin 
    src="C:\1.avi"
    autostart="true" 
    console="cons" 
    controls="ImageWindow">
</EMBED>
</BODY></HTML>

//插入Flash播放器

<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"  codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0"
width="480" height="360" title="saxs">
<param
name="movie" value="c:\1.swf"
/>
<param name="play" value="false"
/>
<param name="quality" value="high"
/>
<param name="allowscriptaccess"
value="always"
/>
<param name="allowfullscreen"
value="true" />

</object>

delphi 插入 HTML代码 播放器的更多相关文章

  1. html 音乐 QQ播放器 外链 代码 播放器 外链 代码

    韩梦飞沙  韩亚飞  313134555@qq.com  yue31313  han_meng_fei_sha QQ播放器 外链 代码 播放器 外链 代码 ======== 歌曲链接 QQ播放器 外链 ...

  2. (jsp/html)网页上嵌入播放器(常用播放器代码整理) http://www.jb51.net/article/37267.htm

    网页上嵌入播放器,只要在HTML上添加以上代码就OK了,下面整理了一些常用的播放器代码,总有一款适合你,感兴趣的朋友可以参考下哈,希望对你有所帮助   这个其实很简单,只要在HTML上添加以上代码就O ...

  3. 有两种分别用<bgsound>和<embed></embed>标签,当用<embed>插入背景音乐时可以设置宽度和高度为0，隐藏播放器。

     <bgsound>: <bgsound> 是用来插入背景音乐,但只适用于 ie,其参数设定不多.如下 <bgsound src="your.mid" ...

  4. flash视频器播放器代码

    <html> <head> <meta http-equiv="Content-Type" content="text/html; char ...

  5. .net C# 网页播放器 支持多种格式 媒体播放器 播放器 代码

    .avi格式代码片断如下:<object id='video' width='400' height='200' border='0' classid='clsid:CFCDAA03-8BE4- ...

  6. 微信小程序（有始有终，全部代码）开发---跑步App+音乐播放器 Bug修复

    开篇语 昨晚发了一篇: <简年15: 微信小程序(有始有终,全部代码)开发---跑步App+音乐播放器 > 然后上午起来吃完午饭之后,我就准备继续开工的,但是突然的,想要看B站.然后在一股 ...

  7. 基于jQuery虾米音乐播放器样式代码

    分享一款基于jQuery虾米音乐播放器样式代码.这是一款基于jquery+html5实现的虾米音乐播放器源码下载.效果图如下: 在线预览   源码下载 实现的代码. html代码: <div c ...

  8. [转]html网页 swf播放器使用代码

    <object id="player" height="240" width="275" classid="CLSID:6B ...

  9. 基于jQuery仿QQ音乐播放器网页版代码

    基于jQuery仿QQ音乐播放器网页版代码是一款黑色样式风格的网页QQ音乐播放器样式代码.效果图如下: 在线预览   源码下载 实现的代码. html代码: <div class="m ...

随机推荐

  1. HTML5 随音乐节奏变化的频谱图动画

    这里将要介绍的HTML5 音频处理接口与Audio标签是不一样的.页面上的Audio标签只是HTML5更语义化的一个表现,而HTML5提供给JavaScript编程用的Audio API则让我们有能力 ...

  2. MySQL压测中遇到的一些问题

    批量insert http://blog.csdn.net/xiaoxian8023/article/details/20155429 Mysql jdbc 批处理数据,需要给jdbc连接加上rewr ...

  3. Linux Kernel 4.8分支第4个候选版本发布

    导读 今天,大神Linus Torvalds宣布了Linux 4.8分支的第四个候选版本,该候选版本在提供常规驱动更新.架构改善和部分KVM调整之外最大的新功能就是修复了英特尔Skylake电源管理B ...

  4. webservice-WebService试题

    ylbtech-doc:webservice-WebService试题 WebService试题 1.A,返回顶部 001．{WebService题目}下列是Web服务体系结构中的角色的是()(选择3 ...

  5. hdu4561 bjfu1270 最大子段积

    就是最大子段和的变体.最大子段和只要一个数组,记录前i个里的最大子段和在f[i]里就行了,但是最大子段积因为有负乘负得正这一点,所以还需要把前i个里的最小子段积存起来.就可以了.直接上代码: /* * ...

  6. 国内外开源与 SaaS ,团队协作平台、项目管理工具整理

    整理一些开源与 SaaS ,团队协作平台.项目管理工具.还有哪些比较好的工具,可以推荐下? 名称 地址 备注 asana https://asana.com/ 国外 basecamp https:// ...

  7. 关于SecureCRT的安装和破解问题以及xp系统的串口问题

    今天下午找了几个小时的软件,因为交叉编译环境要搭好,其中SecureCRT还有串口问题要解决,我突然间发现我开始光盘中的SecureCRT坏掉了,在网站上下载SecureCRT,结果要很多的积分,这样 ...

  8. 简易nagios安装

    这段时间一直在进行nagios安装的实验,进行了很多的实验,现在也就是将这些进行一些基础的记录. 本篇主要讲述的是进行nagios的简易安装,在安装完成之后,能够在web页面上看到本地的监控图像, n ...

  9. 为什么你写的Python运行的那么慢呢？

    大约在一年前,也就是2013年在Waza(地名),Alex Gaynor提到了一个很好的话题:为什么用Python.Ruby和Javascript写的程序总是运行的很慢呢?正如他强调的,关键就是现在出 ...

  10. ACM2033

    /**人见人爱A+B Time Limit: 2000/1000 MS (Java/Others) Memory Limit: 65536/32768 K (Java/Others) Total Su ...