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

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

Вызов PostMessage в DLL. [D2, D3, D4, D5, D6, Win95/98, WinME, NT4, Win2k, WinXP]


comwad ©   (2002-03-08 05:13:00) 

Прошу , если можно, помогите со следующим вопросом.
Создана DLL с одной функцией, которая передает мое сообщение
другим приложениям:

FUNCTION MySendMessage:WORDBOOL;
var
MSG_Send_Critical_Alarm: Integer;
const
UniqueAppStr1 : PChar = "Send Critical Alarm";
BEGIN
MSG_Send_Critical_Alarm := RegisterWindowMessage(UniqueAppStr1);
PostMessage (HWND_BROADCAST,MSG_Send_Critical_Alarm,88,8;
Beep(425,100) ;
RESULT:=True;
END;

Запуск этой функции из DLLиз обычного приложение отлично отрабатывается
и сообщение сформированное DLLловится всеми другими приложениями.

ПРОБЛЕМА:
Если запустить эту функцию DLL из под расширенной процедуры на MS SQL (Вызов из вызова),
то BEEP отрабатывает,а сообщение теряется и ни кто его не получает.
В чем может быть проблема создания сообщения из DLL при запуске DLL из под Extended Stored Procedure ?


Спасибо.
Вадим.


VuDZ   (2002-03-08 10:14:00) [1]

А ты попробуй вставить строки типа GetLastError() и выводом на экран - иногда можно много нового узнать о том, что думает сиcтема о тебе как о программёре :>


Наверх

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