Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Delphi 10 и Delphi 7 совместимость [D7, WinXP]

Kav © (2007-02-26 11:15:00)
Вчера установил Delphi 10, попробовал откомпилировать свои исходники, и Delphi 10 выдает вот такое чудо ошибка мол (в Delphi 7 там ошибки не было!):
hRet := DIKeyboard.SetDataFormat(c_dfDIKeyboard);//вот на это ругался

вот кусоче кода из DirectInput8
const
c_dfDIKeyboard : TDIDataFormat = (
dwSize : Sizeof(c_dfDIKeyboard);
dwObjSize : Sizeof(TDIObjectDataFormat);
dwFlags : DIDF_RELAXIS;
dwDataSize : Sizeof(TDIKeyboardState);
dwNumObjs : High(_c_dfDIKeyboard_Objects) + 1;
rgodf : @_c_dfDIKeyboard_Objects[Low(_c_dfDIKeyboard_Objects)]
);
а вот тут я сменил var на const и все заработало
function SetDataFormat(var lpdf : TDIDataFormat) : HResult; stdcall;

может я чего не понимаю (может не надо править исходники) и эту совместимость можно настроить ?

tesseract (2007-03-01 16:43:00) [1]

> Вообще конечно непонятно, что нужно было курить, чтоб придумать
> такое. Константы, которым в ран тайм можно присваивать
> значения...

Ну скорей всего константа идёт по адресу. А всё, что под адресом, мона менять. Хотя не выяснял.

Kolan (2007-03-01 16:39:00) [2]
> вообще-то Delphi 10 по сравнению с Delphi 7 как-то сыроват,
> я обратно перешел на Delphi 7 :)

Ну давай давай... :)

Par (2007-03-01 15:39:00) [3]
вообще-то Delphi 10 по сравнению с Delphi 7 как-то сыроват, я обратно перешел на Delphi 7 :)

jack128 (2007-02-28 17:26:00) [4]
tesseract © (27.02.07 11:19) [1]
да на assignable typed consts наверника.. Вообще конечно непонятно, что нужно было курить, чтоб придумать такое. Константы, которым в ран тайм можно присваивать значения...

DVM (2007-02-28 12:59:00) [5]

> эту совместимость можно настроить ?

можно

tesseract (2007-02-27 11:19:00) [6]
А на что ругался то?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »