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

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

Код

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

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

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

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

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

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

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

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

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

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

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

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

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

Цитата(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.

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

Присоединённый файл ( Кол-во скачиваний: 9 )
 hotkeyx.zip 4,54 Kb

Спасиба.

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

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

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

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

Это сообщение отредактировал(а) Girder - 23.8.2005, 12:45

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

Цитата(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, и должно быть обработано в цикле обработки сообщений.

Цитата

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.

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

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

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