Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Потрепаться";
Текущий архив: 2005.12.11;
Скачать: [xml.tar.bz2];

Вниз

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

 
ПЛОВ ©   (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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.034 c
9-1121833769
Andry
2005-07-20 08:29
2005.12.11
Как улучшить модель


2-1132275620
Pop
2005-11-18 04:00
2005.12.11
Как узнать размер TPopupMenu ?


14-1132559785
Игорь Шевченко
2005-11-21 10:56
2005.12.11
Откуда растут руки у русских программистов ?


3-1130134593
Zhekson
2005-10-24 10:16
2005.12.11
как скопировать все записи базы изменив один параметр?


3-1129931650
Ivan Melnikov
2005-10-22 01:54
2005.12.11
Lookup в FastReport





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский