![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Здравствуйте, помогите пожалуйста! Пытаюсь прекрутить игровой движок Xtreme3D к Delphi, но есть одна проблема, необходимо привезать его к определённой форме(Окну), при этом созданная форма имеет тип данных TForm, а функция где нужно указать индекс формы для движка должна иметь тип Real. Вопрос такой как перевести TForm в Real?
// Импорт функции движка function EngineCreate(Win: real): real; stdcall; external 'Xtreme3D.dll'; // // остальной код // MainForm := TForm.Create(nil); Создание формы // Настройка формы // // EngineCreate(MainForm); // Активация движка // Конечно же не верно |