Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.12.11;
Скачать: 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 вся ветка

Текущий архив: 2005.12.11;
Скачать: CL | DM;

Наверх




Память: 0.44 MB
Время: 0.045 c
2-1132674645
Balex
2005-11-22 18:50
2005.12.11
String => PAnsiChar


1-1130999962
kblc
2005-11-03 09:39
2005.12.11
Есть ли у класса интерфейс?


2-1132905010
rsboarder
2005-11-25 10:50
2005.12.11
Фунция Round


14-1132231952
Andersen
2005-11-17 15:52
2005.12.11
Очередная загадка


1-1131610021
Pank83
2005-11-10 11:07
2005.12.11
Назначение OnClick динамически созданному объекту - ПРОДОЛЖЕНИЕ





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский