Delphi 2010的Crt装置

我需要德尔福2010控制台应用程序（ReadKey，GotoXY，…）的Crt单元。Delphi 2010有任何Crt装置吗？

我从任何Crt装置开始。

我更新了Branko链接中的代码，并得出以下结论：

---

这是一个用于unicode delphi的工作Crt32。所需的更改包括char->AnsiChar、pChar->PAnsiChar和VariousWin32ApiFunction（）到VariousWin32ApiFunction（）。因为当你在寻找现成的代码时，可以看看torry.net。谢谢，Delphi 2010没有：）但我会试试。如果有人也需要-。通过一些修改（Char/AnsiChar，…）可以很好地工作。我在Unicode Delphi上工作（参见下一个答案），并将文件发布到我的skydrive上，以便任何人都可以看到它们。（有些人可能无法像你那样进行转换，Branko。）你知道什么时候设置{$Define OneByOne}会有用吗？你的场外链接是无用的