Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Отработка модулей в Dll


Gu ©   (2011-05-08 02:50:00) 

Вот есть простая Dll, в ней подключено 2 пустых юнита (uses unit1,unit2), в конце которых есть строки инициализации\финализации модуля, где просто стоит Showmessage('Работает модуль такойто'). Т.е. по идее при LoadLibrary('my.dll') эти месаги должны показываться. Вот терь вопрос: на 2008r2 серваке это работает, тестовая прога делает лоадлайбрари и эти месаги вылазят. Вылазят даже если запускать rundll32 my.dll,test (test - нет такой функции, и будет ошибка, но перед этим вылезут сообщения об отработке модулей). А на Xp и на Win7 это не фурычит, в чем может быть дело?


clickmaker   (2011-05-08 16:14:00) [1]

так а есть сомнения, что срабатывают эти секции? Возможно, просто обламывается Showmessage


Gu   (2011-05-08 16:12:00) [2]

Win7 Ent x64, Delphi Xe.
может там в опциях компилятора что-то подкрутить?


clickmaker   (2011-05-08 14:47:00) [3]

у меня вылазиют. D7, win 7 ultimate


Gu   (2011-05-08 03:04:00) [4]

Код My.dll (исходник)


Library My;

Uses
 Unit1 in 'Unit1.pas',
 Unit2 in 'Unit2.pas';

Begin
//none
End.


Код модуля Unit1 (в Unit2 все аналогично, за исключением сообщений - вместо 1 - 2)


Unit Unit1; Interface

Uses Dialogs;

Implementation

//<none>

Initialization

Showmessage('Init 1');

Finalization

Showmessage('Final 1');

End.


Компилим, получаем библиотеку my.dll, тест (можно и прогу написать для загрузки но так быстрее, прогой загружать тоже пробовал): RunDll32 My.dll,test - на 2008 серваке сообщения вылазиют, а на Win7 и Xp - нет. Пачиму?


Наверх

Титульная страница Поиск, карта сайта Написать письмо