Sal*_*dor 8 html css delphi twebbrowser delphi-xe2
我想在TWebBrowser组件中以格式化的HTML显示rss Feed的输出,如果在TWebbrowser中加载http://code.google.com/feeds/p/v8/svnchanges/basic,则显示content作为XML文件

但如果我使用IE加载相同的页面

我尝试在加载的IHTMLDocument2中注入一个css,正如在这个问题CSS和TWebbrowser delphi中提出的那样,但我仍然得到相同的结果.
问题是,如何在TWebbrowser中加载rss feed但是将输出显示为像IE这样的HTML文档呢?
只是猜测,但您可以尝试应用以下XSL样式表(取自http://snippets.dzone.com/posts/show/1162并按照以下评论中的cherdt建议进行修改):
<xsl:stylesheet version="1.0"
xmlns:atom="http://www.w3.org/2005/Atom"
xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
xmlns:dc="http://purl.org/dc/elements/1.1/">
<xsl:output method="html"/>
<xsl:template match="/">
<xsl:apply-templates select="/atom:feed/atom:head"/>
<xsl:apply-templates select="/atom:feed"/>
</xsl:template>
<xsl:template match="atom:feed/atom:head">
<h3><xsl:value-of select="atom:title"/></h3>
<xsl:if test="atom:tagline"><p><xsl:value-of select="atom:tagline"/></p></xsl:if>
<xsl:if test="atom:subtitle"><p><xsl:value-of select="atom:subtitle"/></p></xsl:if>
</xsl:template>
<xsl:template match="/atom:feed">
<h3><xsl:value-of select="atom:title"/></h3>
<xsl:if test="atom:tagline"><p><xsl:value-of select="atom:tagline"/></p></xsl:if>
<xsl:if test="atom:subtitle"><p><xsl:value-of select="atom:subtitle"/></p></xsl:if>
<ul>
<xsl:apply-templates select="atom:entry"/>
</ul>
</xsl:template>
<xsl:template match="atom:entry">
<li>
<a href="{atom:link[@rel='related']/@href}" title="{substring(atom:published, 0, 11)}"><xsl:value-of select="atom:title"/></a>
<xsl:choose>
<xsl:when test="atom:content != ''">
<p><xsl:value-of select="atom:content" disable-output-escaping="yes" /></p>
</xsl:when>
<xsl:otherwise>
<p><xsl:value-of select="atom:summary" disable-output-escaping="yes" /></p>
</xsl:otherwise>
</xsl:choose>
</li>
</xsl:template>
</xsl:stylesheet>
Run Code Online (Sandbox Code Playgroud)
到你收到的饲料.要转换文档,请参阅此问题的选定答案,然后您可以尝试将生成的XML分配给WebBrowser.
我猜你正在将你的WebBrowser控件指向feed,但是使用这种方法你需要使用例如Indy(检出TIdHTTP及其Get()方法)下载feed ,转换它,然后在你的控件中显示.
请注意,以上只是一个猜测,但我相信这是一个很好的假设.:)
| 归档时间: |
|
| 查看次数: |
1470 次 |
| 最近记录: |