Вниз
Скачать: CL | DM;

Есть тут знатоки С   Найти похожие ветки 

← →
ПЛОВ ©   (2005-11-21 10:39) [0]

Пишу на Биледере програмулину, консольную... Не реагирует на нажатие клавиш, хотя то же самое, написанное на Делфи работает без проблем...
Подскажите, в чем может быть проблема...

WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow)
{
...
 HANDLE ConsoleOutputHANDLE;
 HANDLE ConsoleInputHANDLE;

 COORD Console_COORD;
 CONSOLE_SCREEN_BUFFER_INFO OutScreenInfo, InScreenInfo;

 LPCTSTR S;
 LPDWORD WR;
 INPUT_RECORD IR;

//////////////////////////////////////////
/// Begin program
//////////////////////////////////////////
........
// Create console
AllocConsole();
SetConsoleTitle(AppName);
// Get output handle
ConsoleOutputHANDLE = GetStdHandle(STD_OUTPUT_HANDLE);
// Get input handle
ConsoleInputHANDLE = GetStdHandle(STD_INPUT_HANDLE);
// Set max console size
Console_COORD.X = ConSizeDefX; Console_COORD.Y = ConSizeDefY;
SetConsoleScreenBufferSize(ConsoleOutputHANDLE, Console_COORD);
Console_COORD.X = ConSizeDefX; Console_COORD.Y = ConSizeDefY;
SetConsoleScreenBufferSize(ConsoleInputHANDLE, Console_COORD);

FlushConsoleInputBuffer(ConsoleInputHANDLE);
do
 {
 GetNumberOfConsoleInputEvents(ConsoleInputHANDLE, WR);
   if (WR != 0)
   {
   PeekConsoleInput(ConsoleInputHANDLE, &IR, 1, WR); // тут пробовал и ReadConsoleInput
     if (IR.EventType == KEY_EVENT)
     {
     MessageBox(0, "test", "test", 0);  - при нажатии клавиши должно выводиться это сообщение
     }
   }
 }
while (IR.Event.KeyEvent.wVirtualKeyCode != VK_F1); и выхода из программф не происходит при нажатии на F1 :(

FreeConsole();
return 0;
}


← →
ПЛОВ ©   (2005-11-21 12:57) [1]

ндя... типа всем спасибо :) разобрался сам...
В связи с этим посоветуйте хорошие форумы наподобии этого только по Билдеру (и по C вообще)


← →
VictorT ©   (2005-11-21 15:58) [2]

rsdn.ru ?



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: -0.977 c
2-1132826152
JTAG
2005-11-24 12:55
2005.12.11
Народ подскажите по ComboBox


1-1132134636
Andrey21
2005-11-16 12:50
2005.12.11
Автоматическое изменение Height RichEdit-а


14-1131827082
Джонсон
2005-11-12 23:24
2005.12.11
Microsoft проиграл конкурентам


4-1128594432
Woolen
2005-10-06 14:27
2005.12.11
Обработка сообщения в VCL и в отдельной процедуре


14-1132302421
_Vaitek
2005-11-18 11:27
2005.12.11
Сжатие данных "на лету"




   Наверх