Передача сообщения из программы в свою Dll

[SergeySK]

Ребята, ткните носом. Что не так?

Необходимо чтобы программа передала сообщение всем своим ДЛЛ-кам.
Пишу
WM_CHANGE_SKIN:=RegisterWindowMessa ge('WM_CHANGE_SKIN');
......
BroadcastSystemMessage(BSF_POSTMESS AGE,PDWORD(BSM_ALLCOMPONENTS),WM_CH ANGE_SKIN,1,0);

SendMessage вроде как тут не работает

Теперь в ДЛЛ где я должен ловить это сообщение?
ловлю в

procedure TFormMain.WndProc(var Message: TMessage);
begin
if Message.Msg = WM_CHANGE_SKIN then
begin
действие
end;
end

его там нет?
Вопрос к знатокам? Что не так?

[Slovinsky]

BroadcastSystemMessage(BSF_POSTMESS AGE,PDWORD(BSM_ ALLCOMPONENTS),WM_CHANGE_SKIN,1,0);

Так нельзя. Вы обманываете компилятор, но второй параметр тем не менее передаетет не верно. Нужно передавать именно указатель, а не значение приведенное к указателю. Т.е. так:
var
dw: DWORD;
begin
...
dw:=BSM_ ALLCOMPONENTS;
BroadcastSystemMessage(BSF_POSTMESS AGE,@dw,WM_CHANGE_SKIN,1,0);

хотя в вашем случае вторым параметром можно просто передавать nil, будет то же самое. Для начала исправьте это, а дальше - посмотрим.

[SergeySK]

исправил. Изменений никаких.
Кстати, забыл сказать что в ДЛЛ я также прописал строчку
WM_CHANGE_SKIN:=RegisterWindowMessa ge('WM_CHANGE_SKIN');

может я не там ловлю. Или отсылать надо не тем?

[SergeySK]

Ребята!!!! Ну помогите же кто-нибудь!!!! Неужели никто не знает?
Чувствую, что вопрос буквально одной строчки....