Вниз
Скачать: 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.025 c
14-1132584149
manulo
2005-11-21 17:42
2005.12.11
LPT


1-1131697645
rusgl
2005-11-11 11:27
2005.12.11
Excel, Как изменить чего-то в комментариях к ячейке?


5-1116828723
Ega23
2005-05-23 10:12
2005.12.11
Связь компонента с DataSet


2-1133180778
pathfinder
2005-11-28 15:26
2005.12.11
Как лучше сохранить выборку из Adoquery в файл?


4-1129090176
Smertb
2005-10-12 08:09
2005.12.11
hook




   Наверх