将 Delphi 转换为 Borland C++ builder答案

【问题标题】：Convert Delphi to Borland C++ builder将 Delphi 转换为 Borland C++ builder
【发布时间】：2010-08-23 14:58:45
【问题描述】：

如何转换此 Delphi 代码：

const
  cnCursorID1 = 1;
begin
  Screen.Cursors[ cnCursorID1 ] :=
    LoadCursorFromFile(
      'c:\winnt\cursors\piano.ani' );
  Cursor := cnCursorID1;
end;

到 C++ 生成器

【问题讨论】：

标签： delphi animation cursor c++builder

【解决方案1】：

以下应该可以工作，虽然我还没有测试过。

const int cnCursorID1 = 1;
Screen->Cursors[cnCursorID1] = LoadCursorFromFile("c:\\winnt\\cursors\\piano.ani");
Cursor = cnCursorID1;

(如果你是一个普通的 C++Builder 用户，你会发现很多示例代码和第三方库都在 Delphi 中，所以值得学习至少足够的 Delphi 来阅读并自己翻译.)

【讨论】：

+1 以获得出色的建议。我 - 幸运的是 - 开始使用 Delphi（1996 年！），INCREDIBLY 和 HUGELY 优于当时在 Windows 上开发的所有其他产品。 4 年后切换到 C++ Builder 很简单）。在 .Net C# 出现之前，微软没有什么可以与 Delphi 和 C++ Builder 竞争 imho（在找到 Delphi 之前，我已经花了数年时间在 VB 十字架上崩溃和流血）。

【解决方案2】：

警告：代码由眼睛编译，手头没有 Borland 编译器。

{
    const int cnCursorID1 = 1;
    Screen->Cursors[ cnCursorID1 ] =
        LoadCursorFromFile("c:\\winnt\\cursors\\piano.ani" );
    Cursor = cnCursorID1;
}

【讨论】：

抱歉，刚刚把Screen.Cursors改成了Screen->Cursors