Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.03.29;
Скачать: CL | DM;

Вниз

Вызов _Release   Найти похожие ветки 

 
XProger ©   (2006-07-21 20:54) [0]

Сегодня столкнулся с проблемой.
Приложение использует несколько интерфейсов, которые при выходе сами уничтожаются, причём важен порядок их уничтожения (интерфейсы жёстко связаны)
В Delphi 7 уничтожение происходит в порядке объявления переменных начиная с последнего, в BDS начиная с первого.
В итоге проблема была решена так:
var
{$IF RTLVersion > 15.0}
 snd : ISound;
 inp : IInput;
 vfp : IShader;
 tex : ITexture;
 ogl : IOpenGL;
 wnd : IWindow;
 eX  : IEngine;
 vec : IVector;
 log : ILog;
{$ELSE}
 log : ILog;
 vec : IVector;
 eX  : IEngine;
 wnd : IWindow;
 ogl : IOpenGL;
 tex : ITexture;
 vfp : IShader;
 inp : IInput;
 snd : ISound;
{$IFEND}
Возможно код будет некорректен для других версий Delphi (нет возможности протестировать)
Существуют ли другие решения? Кто-нибудь сталкивался с подобными проблемами в BDS 2006?
Не хочется натыкаться на подобные подводные камни... :)


 
isasa ©   (2006-07-22 10:51) [1]

А, гарантированно, ручками, в нужном порядке ?
myIntf:=nil;


 
XProger ©   (2006-07-22 13:03) [2]

isasa, спасибо! Вечно я себе проблемы создаю... :)



Страницы: 1 вся ветка

Текущий архив: 2009.03.29;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.025 c
15-1232491734
XentaAbsenta
2009-01-21 01:48
2009.03.29
"благодаря использованию XML" (с)


2-1233734767
snake-as
2009-02-04 11:06
2009.03.29
Сделать активным окно программы


15-1233240162
@!!ex
2009-01-29 17:42
2009.03.29
Самый лучший фильм 2


1-1208685519
Kolan
2008-04-20 13:58
2009.03.29
Сложный кросс таб отчет. Варианты реализации.


15-1232422546
DelphiN!
2009-01-20 06:35
2009.03.29
Неудается завершить пользовательский процес