如何使用旧 indy9 包中的组件答案

【问题标题】：How to use component from the old indy9 package如何使用旧 indy9 包中的组件
【发布时间】：2013-08-07 10:25:27
【问题描述】：

我已经在 Delphi7 中将 Indy9 升级到了 Indy10。我花了一些时间来更改 TCP 服务器和客户端的所有部分，但现在看起来效果不错。

现在，我注意到有一部分仍然无法正常工作，那就是 idHTTPserver 组件。

我们的应用程序网页正在使用 mootools 库。使用 Indy9 idHTTPserver 可以完美运行，但是 Indy10 做了一些事情，导致浏览器无法显示页面。

除了一些其他错误之外，还有这个无意义的错误，例如（Firefox 错误控制台输出）：

Timestamp: 2013.08.07 13:13:56
Error: SyntaxError: missing ] after element list
Source File: http://192.168.100.2:8780/lib/ui/core/mootools-1.2.4-more-yc.js
Line: 103, Column: 60
Source Code:
unction(){var b=["C?","C ","C","C?","C,","C¢","Cƒ","C£","C"","C¤","C.","C?","Ä,","Äƒ","Ä"","Ä.","Ä?","Ä?","ÄŒ","Ä¨","C?
-------------------------------------------------------------^

这个.js里面的实际源码是：

long long text ....... function(){var b=["C?","C ","C","C?","C,","C¢","Cƒ","C£","C"","C¤","C.","C?","Ä,","Äƒ","Ä"","Ä.","Ä?","Ä?","ÄŒ","Ä¨","C?","C§","Ä?","Ä¸","Ä","Ä'","Cˆ","CØ","C?","C©","CŠ","CR","C<","C«","Äš","Ä>","Ä˜","ÄT","Ä?","ÄŸ","CŒ","C¬","C¨","C","C?","C®","C¸","CÆ","Ä¹","Är","Ä½","Ä¾","Å","Å,","C'","C±","Å?","Åˆ","Åƒ","Å"","C'","C²","C"","C³","C"","C´","C.","Cµ","C-","C¶","C˜","Cø","Å'","Å˜","ÅT","Å"","Å.","Å ","Å?","Å?","ÅŸ","Åš","Å>","Å¤","Å?","Å¤","Å?","Å¢","Å£","CT","C¹","Cš","Cr","C>","C»","Cœ","C¼","Å®","ÅÆ","Åø","Cæ","C½","C¯","Å½","Å¾","Å¹","År","Å»","Å¼","C?","C¾","C","C°","CŸ","Å'","Å"","C?","C¦","Aµ"]; ................ long long text

这里发生了什么？

我深吸一口气，想，嘿，我可以只使用旧版本的 idHTTPserver，因为我在另一个文件夹中仍然有 Indy9 的源文件。如果没有人知道如何修复 indy10 HTTPserver，有人可以告诉我如何使用旧版本吗？只是 HTTPserver 组件（它肯定会与其他 10 多个旧的 indy 文件链接）。

我试图包含旧的来源，但它变得一团糟，因为它会使用旧版本的 idHTTPserver.pas，但 idCustomHTTPserver.pas（这是我遵循使用 idHTTPserver.pas 文件后发生的情况）从新版本...

【问题讨论】：

Firefox 抱怨的代码是错误的，但它与您所说的文件中的内容相符。你有一个错误的引号。也许你需要逃避它。这与 Delphi 或 Indy 无关。你的 JavaScript 坏了，你的浏览器注意到了。
你确定是问号有问题吗？这对我来说很可疑："C""。这正是 Firefox 所指向的地方。我认为第一个 " 正在终止字符串文字，并且由于它后面没有 , 或 ] ，因此数组格式不正确。所以第一个" 需要被转义。 "Ä"" 和 "Å"" 也一样。

标签： delphi indy10 httpserver indy-9

【解决方案1】：

要在一个项目中使用不同的 Indy 版本，请将项目搜索路径设置为 Indy\Lib\Core、\Protocols 和 \System，并在代码中实例化所有组件。

这还有一个好处是可以避免在不同的 Indy 10 版本之间切换的卸载/安装步骤。

【讨论】：

问题不是这样。 :-) 它询问了如何使用 Indy9 IdHTTPServer，同时仍然使用 Indy10 版本。

【解决方案2】：

虽然这不是我在标题中提出的问题的直接答案，但这确实解决了我的问题。

我跟着函数HTTPserver.WriteContent进入idHTTPServer.pas，然后对比了Indy9和Indy10的idHTTPServer.pas文件，Indy10中关于编码的部分引起了我的注意。

在第 2039 行，我删除了 write 函数的第二个参数

FConnection.IOHandler.Write(ContentText, CharsetToEncoding(CharSet));
替换为 FConnection.IOHandler.Write(ContentText);

这解决了我的问题。现在一切正常。

正如评论者所注意到的那样，这里的主要问题是额外的 " 符号。我很愚蠢，因为我单击了 firefox 控制台中的链接，它打开了版本错误的 javascript 文件，出于某种原因，我认为这是应该的。过了一会儿，我决定检查我电脑上的实际文件，结果发现"C"" 甚至不是 C，实际文本是这样的

var b=["À","à","Á","á","Â","â","Ã","ã","Ä","ä","Å","å","Ă","ă","Ą","ą","Ć","ć","Č","č","Ç","ç","Ď","ď","Đ","đ","È","è","É","é","Ê","ê","Ë","ë","Ě","ě","Ę","ę","Ğ","ğ","Ì","ì","Í","í","Î","î","Ï","ï","Ĺ","ĺ","Ľ","ľ","Ł","ł","Ñ","ñ","Ň","ň","Ń","ń","Ò","ò","Ó","ó","Ô","ô","Õ","õ","Ö","ö","Ø","ø","ő","Ř","ř","Ŕ","ŕ","Š","š","Ş","ş","Ś","ś","Ť","ť","Ť","ť","Ţ","ţ","Ù","ù","Ú","ú","Û","û","Ü","ü","Ů","ů","Ÿ","ÿ","ý","Ý","Ž","ž","Ź","ź","Ż","ż","Þ","þ","Ð","ð","ß","Œ","œ","Æ","æ","µ"];

所以，我是对的。当整个文本经过 CharsetToEncoding 时，它将所有这些单个符号字符转换为 2 个符号。

我不会接受我自己的答案，因为它并没有真正回答标题问题，我很想知道是否可以使用旧版本的单个组件而其余的都是新的。

【讨论】：