Модераторы: Snowy, bartram, MetalFan, bems, Poseidon, Riply
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как обработать сообщение WM_DEVICECHANGE в DLL, не получается словить сообщение 
:(
    Опции темы
kosyak
Дата 19.5.2011, 01:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 20
Регистрация: 15.5.2011

Репутация: нет
Всего: нет



для просто модуля использую:
Код

 ... 
 procedure WMDeviceChange(var Msg: TMessage); message WM_DEVICECHANGE;
 ...
 procedure TForm1.WMDeviceChange(var Msg: TMessage);
 begin
  inherited;
  // Вставили usb устройство
  if Msg.wParam=DBT_DEVICEARRIVAL then
     begin
     end;
 .... 


с эти проблем нет, но я не знаю как сделать тоже самое при работе с Dll.
Так как там нет описания процедур и функций, procedure WMDeviceChange(var Msg: TMessage); message WM_DEVICECHANGE
уже не катит, выдает ошибку, что типа  "message WM_DEVICECHANGE" передаваться здесь не должен.

Как тогда быть? 


PM MAIL   Вверх
Dik0n
Дата 19.5.2011, 02:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 153
Регистрация: 11.5.2011

Репутация: 1
Всего: 10



Создай невидимое окно на WinAPI RegisterClass(...) CreateWindow(...) и работай через него

Код

function WindowProc(hWnd, Msg, wParam, lParam: LongInt): LongInt; stdcall;
begin
  Result := DefWindowProc(hWnd, Msg, wParam, lParam);
  if Msg = WM_DEVICECHANGE then
end;


Это сообщение отредактировал(а) Dik0n - 19.5.2011, 02:30
--------------------
▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓ ◄◄◄ Сотри монеткой защитный слой
PM MAIL WWW   Вверх
kosyak
Дата 19.5.2011, 04:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 20
Регистрация: 15.5.2011

Репутация: нет
Всего: нет



Цитата(Dik0n @ 19.5.2011,  02:24)
Создай невидимое окно на WinAPI RegisterClass(...) CreateWindow(...) и работай через него

Код

function WindowProc(hWnd, Msg, wParam, lParam: LongInt): LongInt; stdcall;
begin
  Result := DefWindowProc(hWnd, Msg, wParam, lParam);
  if Msg = WM_DEVICECHANGE then
end;

Спасибо, попробую
PM MAIL   Вверх
MetalFan
Дата 20.5.2011, 14:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 16
Всего: 128



kosyak, Можно обойтись AllocateHwnd/DeallocateHWnd я думаю...


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
kosyak
Дата 20.5.2011, 22:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 20
Регистрация: 15.5.2011

Репутация: нет
Всего: нет



Цитата(MetalFan @ 20.5.2011,  14:19)
kosyak, Можно обойтись AllocateHwnd/DeallocateHWnd я думаю...

Спасибо за советы, все хорошо работает
PM MAIL   Вверх
Dik0n
Дата 21.5.2011, 11:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 153
Регистрация: 11.5.2011

Репутация: 1
Всего: 10



Цитата(MetalFan @  20.5.2011,  14:19 Найти цитируемый пост)
kosyak, Можно обойтись AllocateHwnd/DeallocateHWnd я думаю... 

Зачем тянуть в DLL за собой модуль Classes там так-же используется CreateWindowEx! а за ним SysUtils и всякую ненужную батву.

ЗЫ: Вот за это ИМХО Delphi и щитают языком для кнопкокидателей! smile 
--------------------
▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓ ◄◄◄ Сотри монеткой защитный слой
PM MAIL WWW   Вверх
Keeper89
Дата 21.5.2011, 12:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2580
Регистрация: 26.2.2009

Репутация: 14
Всего: 58



Цитата(Dik0n @  21.5.2011,  11:14 Найти цитируемый пост)
ЗЫ: Вот за это ИМХО Delphi и щитают языком для кнопкокидателей!

То есть подключение ненужного модуля = кнопкокидание?


--------------------
PM MAIL WWW   Вверх
Dik0n
Дата 21.5.2011, 16:27 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 153
Регистрация: 11.5.2011

Репутация: 1
Всего: 10



Цитата(Keeper89 @  21.5.2011,  12:21 Найти цитируемый пост)
То есть подключение ненужного модуля = кнопкокидание? 

Смотря какого модуля! некоторые пионеры блин, что-бы в плагине сделать диалог, далают его на VCL. Плагин содержит пару функций а весит 500 кило, вот и думают что Delphi отстой, а это не Delphi отстой а руки кривые и голова без извилин. К чему я это, да просто некоторые настолько обленились, что убери компоненты, они ничего сложнее HelloWorld написать и не смогут.
Была бы возможность они и драйвера бы на VCL писали  smile 

MetalFan, если что это к тебе не относится, просто высказался.

Sorry за  smile 

Это сообщение отредактировал(а) Dik0n - 21.5.2011, 16:36
--------------------
▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓ ◄◄◄ Сотри монеткой защитный слой
PM MAIL WWW   Вверх
MetalFan
Дата 21.5.2011, 16:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 16
Всего: 128



Цитата(Dik0n @  21.5.2011,  11:14 Найти цитируемый пост)
Зачем тянуть в DLL за собой модуль Classes там так-же используется CreateWindowEx! а за ним SysUtils и всякую ненужную батву.

и чем тебя печалит 500кб? При нынешних то объемах носителей...
Зачем использовать делфи вообще?! раз там столько "ненужно ботвы"? пиши на сях десятки строк с исп.WinApi и радуйся килобайтными размерами.
Только вот нафига? нато оно и RAD, что позволяет обойтись без написания сотен строк обертки над WinApi, чтобы получить элементарное окно с н-кими элементами управления.




--------------------
There are always someone smarter than you...
PM MAIL   Вверх
Dik0n
Дата 21.5.2011, 17:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 153
Регистрация: 11.5.2011

Репутация: 1
Всего: 10



Цитата(MetalFan @  21.5.2011,  16:38 Найти цитируемый пост)
и чем тебя печалит 500кб? При нынешних то объемах носителей...

Дело не в объеме а в производительности. Да если пишешь десктопное приложение то VCL кулл, а если что нибуть системное. представь например хук на клаву в 500 кб, DLL будет подключатся ко всем процессам и инициализировать ненужные модули, конечно на совремменых компах это не заметно, но меня просто выводит из себя что программисту вобще пофиг на оптимизацию запускается и фиг с ним.

Цитата(MetalFan @  21.5.2011,  16:38 Найти цитируемый пост)
Зачем использовать делфи вообще?! раз там столько "ненужно ботвы"? пиши на сях десятки строк с исп.WinApi и радуйся килобайтными размерами.

Меня Delphi всем устраивает, если что надо я всегда на WinAPI пишу.
--------------------
▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓ ◄◄◄ Сотри монеткой защитный слой
PM MAIL WWW   Вверх
MetalFan
Дата 21.5.2011, 19:47 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 16
Всего: 128



Цитата(Dik0n @  21.5.2011,  17:05 Найти цитируемый пост)
представь например хук на клаву в 500 кб

При чем тут хук на клаву и 500кб? Глобальный WH_KEYBOARD_LL вообще можно из своего приложения ставить без всяких dll, afaik.
Хотя все зависит от задачи. Если прицел на скорость и оптимизацию - то велкам, хоть на асме пиши.
А если важна скорость разработки и не критично быстродействие - то VCL рулит.


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
Keeper89
Дата 21.5.2011, 23:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2580
Регистрация: 26.2.2009

Репутация: 14
Всего: 58



Цитата(Dik0n @  21.5.2011,  17:05 Найти цитируемый пост)
а если что нибуть системное. представь например хук на клаву в 500 кб

Берется любой С++ и пишется, как и сказал MetalFan smile

Но мы все поняли, о чем ты ;)

Это сообщение отредактировал(а) Keeper89 - 21.5.2011, 23:14


--------------------
PM MAIL WWW   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: WinAPI и системное программирование"
Snowybartram
MetalFanbems
PoseidonRrader
Riply

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Delphi обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • 99% ответов по WinAPI можно найти в MSDN Library, оставшиеся 1% здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, bartram, MetalFan, bems, Poseidon, Rrader, Riply.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: WinAPI и системное программирование | Следующая тема »


 




[ Время генерации скрипта: 0.0541 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.