Конвертировать Delphi в Borland C ++ builder - PullRequest
2 голосов
/ 23 августа 2010

Как преобразовать этот код Delphi:

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

в C ++ Builder

Ответы [ 2 ]

7 голосов
/ 23 августа 2010

Следующее должно работать, хотя я его не проверял.

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

(Если вы обычный пользователь C ++ Builder, вы найдете много примеров кода исторонние библиотеки есть в Delphi, поэтому стоит изучить хотя бы достаточно Delphi, чтобы прочитать его и перевести самостоятельно.)

2 голосов
/ 23 августа 2010

Предупреждение: код, скомпилированный на глаз, без компилятора Borland.

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