Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: WinAPI и системное программирование > Обработка сообщений Windows.

Автор: Delphins 14.8.2005, 20:23

Так как приложение без формы то незнаю как обрабатывать сообщения о том что пришли данные. Оповещение приходит ввиде сообщений Windows.
WSAAsyncSelect( Sock, Handle, WM_SOCKET, FD_ACCEPT + FD_READ + FD_CLOSE );
Так задаю что сообщение WM_SOCKET при приеме данных, соеденении и отключении.
А как потом их обработать? И что писать в Handle? Как его узнать?
Вопрос в теме WinApi т.к. впорос не по сокету а потому как обработать сообщения и как получить хэндл программы. Юнит forms подключать нельзя!

Автор: rsm 14.8.2005, 22:38

Попробуй так:

Код


var
    msg: TMSG;
begin
    while GetMessage(msg, 0, 0, 0) do
        begin
            // тут обрабатываешь сообщение
        end;

Автор: Snowy 15.8.2005, 09:26

Сообщения посылаются именно окну. Без окна ты их не получишь.
Создай элементарное окно, но не показывай его, а только используй для ловли событий.

Автор: Akella 15.8.2005, 09:47

а application.handle не подойдёт, application как окно получает сообщения или нет?

Автор: Snowy 15.8.2005, 12:15

Цитата(dsergey @ 15.8.2005, 09:47)

а application.handle не подойдёт, application как окно получает сообщения или нет?

Написано же - без формы.

Цитата(Delphins @ 14.8.2005, 20:23)

Юнит forms подключать нельзя!

TApplication живет именно в нем.

Автор: rsm 15.8.2005, 18:25

Цитата(Snowy @ 15.8.2005, 11:26)

Сообщения посылаются именно окну. Без окна ты их не получишь.

Получит, но далеко не все. Например, можно получить общесистемные сообщения типа WM_HOTKEY или WM_ENDSESSION.

Автор: Song 16.8.2005, 07:50

Сказано ж: получать сообщения могут только окна!

Автор: rsm 16.8.2005, 11:07

Цитата(Song @ 16.8.2005, 09:50)

Сказано ж: получать сообщения могут только окна!

Да ну?

Попробуй-ка сперва скомпилить и запустить на выполнение вот этот код.

Код


program hokeyx;

uses
   Windows, Messages;

const
   MY_HOT_KEY = 7077;

var
   msg: TMSG;

begin
   RegisterHotKey(0, MY_HOT_KEY, MOD_WIN + MOD_ALT, VK_F11);
   while GetMessage(msg, 0, 0, 0) do
      if msg.message = WM_HOTKEY then
         if msg.wParam = MY_HOT_KEY then
            begin
               if MessageBox(0, 'Нажаты клавиши Win+Alt+F11.' + #13 +
                  'Продолжить контроль клавиш?',
                  'Внимание',
                  MB_TOPMOST + MB_ICONINFORMATION + MB_YESNO) = ID_YES then
                     continue;
               UnregisterHotKey(0, MY_HOT_KEY);
               exit;
            end;
end.

Если лень компилировать, в аттаче есть готовый ЕХЕшник.

Автор: Delphins 16.8.2005, 17:35

Спасиба.

Автор: Song 23.8.2005, 10:29

ок, отредактировал smile

RegisterHotKey(0, MY_HOT_KEY, MOD_WIN + MOD_ALT, VK_F11);

Обрати внимание на жирный участок строчки из твоего примера.
Это ничто иное как HWND_DESKTOP !

Т.е. сообщения у тебя получает окно эксплорера!
От этого суть не меняется: сообщения получают только окна.

Автор: Song 23.8.2005, 10:42

А окно, получив твоё сообщение, перенаправляет его в оконную процедуру, где ты его и забираешь своим кустарным методом.

Автор: rsm 23.8.2005, 15:12

Цитата(Song @ 23.8.2005, 12:29)

Это ничто иное как HWND_DESKTOP

Ну эт я знаю. Просто использую сразу значение, а не именованную константу.

Цитата(Song @ 23.8.2005, 12:29)

сообщения у тебя получает окно эксплорера

Сообщения получают не только окна, но еще и треды запущенных в системе процессов. Хотите доказательств? Их есть у меня!

Цитата

Код


BOOL RegisterHotKey(

    HWND hWnd,    // window to receive hot-key notification
    int id,    // identifier of hot key
    UINT fsModifiers,    // key-modifier flags
    UINT vk    // virtual-key code
   );

Parameters

hWnd

Identifies the window that will receive WM_HOTKEY messages generated by the hot key. If this parameter is NULL, WM_HOTKEY messages are posted to the message queue of the calling thread and must be processed in the message loop.

Перевод выделенного курсивом предложения:
Если этот параметр равен нулю, сообщение WM_HOTKEY посылается в тред, вызвавший функцию RegisterHotKey, и должно быть обработано в цикле обработки сообщений.

Автор: Snowy 23.8.2005, 15:48

Цитата

int WSAAsyncSelect (
SOCKET s,
HWND hWnd,
unsigned int wMsg,
long lEvent
);
Parameters:
hWnd - A handle identifying the window which should receive a message when a network event occurs.

Окно! Без окна тут не обойтись.

Автор: maxim1000 23.8.2005, 15:55

внесу-ка я разнообразие
окна вообще не получают сообщений smile

сообщения всегда посылаются в очередь потока
если используются функции Send(Post)Message, сначала происходит определение потока, создавшего окно, а потом сообщение кидается в его (потока) очередь сообщений
и оттуда с помощью DispatchMessage вызывается оконная процедура, а окно ничего никуда не перенаправляет...
сообщение вообще можно отослать напрямую потоку с помощью функции PostThreadMessage (как, впрочем, и происходит в большинстве программ с сообщение WM_QUIT при закрытии главного окна)

Автор: rsm 23.8.2005, 15:58

maxim1000
Спасибо, наконец кто-то прояснил ситуацию! smile

Автор: Snowy 23.8.2005, 16:41

Цитата(Song @ 23.8.2005, 10:29)

Это ничто иное как HWND_DESKTOP !

Цитата(rsm @ 23.8.2005, 15:12)

Ну эт я знаю. Просто использую сразу значение, а не именованную константу.

В данном случае это GetCurrentTreadId()
Сообщение потоку будет отправлено через PostThreadMessage.
С оконными сообщениями такой вариант не подходит.
SendMessage потоку не сделаешь...

Цитата(Snowy @ 23.8.2005, 15:48)

Окно! Без окна тут не обойтись.

В принципе, если использовать WSAEventSelect, то можно и без окна, через WSAWaitForMultipleEvents.
Для однопоточных оконных приложений не годится, но т.к. у тебя окна нет, то с таймаутом должно подойти.
В крайнем случае можно сделать в несколько потоков.

Добавлено @ 16:42
Во, пока писал, уже сообщений набралось...